Help for this page

Select Code to Download


  1. or download this
    my @files=();
@files=glob('*');
print join("\n",@files),"\n";
  2. or download this
    use Data::Dump qw( pp );
pp <*.pl>;
  3. or download this
    use Cwd;
my $dir = getcwd;
print "$dir\n";
  4. or download this
    warnings/register.pm
/usr/share/perl/5.24/warnings/register.pm
...
/usr/local/lib/x86_64-linux-gnu/perl/5.24.1/XSLoader.pm
subs.pm
/usr/share/perl/5.24/subs.pm