Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
open my $f,'<',$r or die "open failed: $!";
print while <$f>;
close $f;
  2. or download this
    Hello World
123
just a short text
  3. or download this
    #!/usr/bin/perl

...
open my $f,'<:raw',$r or die "open failed: $!";
print while <$f>;
close $f;
  4. or download this
    open failed: No such file or directory at test.pl line 9.
  5. or download this
    Summary of my perl5 (revision 5 version 12 subversion 3) configuration
+:

...
    /usr/lib64/perl5/site_perl
    /usr/lib64/perl5/vendor_perl
    .