Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
my $smaps = do { local $/; <$f> };
close($f);
print "$smaps\n";
  2. or download this
    #!/usr/bin/perl
use strict;
...
my $smaps = do { local $/; <$f> };
close($f);
print "$smaps\n";
  3. or download this
    ---
Flags:
...
    PATH=/usr/kerberos/bin:/usr/local/bin:/usr/bin:/bin:/usr/X11R6/bin
+:/home/ian/bin:/sbin
    PERL_BADLANG (unset)
    SHELL=/bin/bash