Opened by J-jayz-Z at 2005-05-15 02:55
User since
2005-04-13
625 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-04-13
625 Artikel
BenutzerIn
ahh, ich hatte ihn wirklich nicht gelesen den Beitrag. thx!
Ich hab jetzt nur noch ein Problem. Wie kann ich das machen?
Mein Ansatz:
das in der foreach Schleife von @array.
So _sollte_ $_ dann ungefähr so aussehen:
Da bekomme ich allerdings folgende Fehlermeldung:
Jemand ne bessere Idee, die funktioniert? :(
Ich hab jetzt nur noch ein Problem. Wie kann ich das machen?
Mein Ansatz:
Code: (dl
)
$_ = $dir$_ if($opts{d});das in der foreach Schleife von @array.
So _sollte_ $_ dann ungefähr so aussehen:
Code: (dl
)
/home/rootcris/filme/$_
Da bekomme ich allerdings folgende Fehlermeldung:
Code: (dl
)
1
2
3
4
5
6
7
8
rootcris@ingo:~/scripts$ ./filesize.pl -d /home/rootcris/filme/
Scalar found where operator expected at ./filesize.pl line 80, near "$dir$_"
(Missing operator before $_?)
"my" variable @sort masks earlier declaration in same statement at ./filesize.pl line 89.
syntax error at ./filesize.pl line 80, near "$dir$_ "
syntax error at ./filesize.pl line 82, near ");"
Can't use global $_ in "my" at ./filesize.pl line 92, near "{$_"
Execution of ./filesize.pl aborted due to compilation errors.
Jemand ne bessere Idee, die funktioniert? :(
perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'
http://perl-tutor.de
http://perl-tutor.de