aktuelles Verzeichnis - #54923 (Allgemeines zu Perl)

J-jayz-Z

2005-05-18 01:55

User since
2005-04-13
625 Artikel
BenutzerIn

okay, mein code sieht so aus:

Code: (dl )

1
2
3

opendir(DIR, ".");
my @dir = readdir(DIR);
closedir(DIR);

und in @dir ist jetzt mein /bin/ Verzeichniss....

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