Help for this page

Select Code to Download

Select or download this

use Errno ':POSIX';

{
...

    print 'test', $/ or die $!;
}

Select or download this

*CORE::GLOBAL::glob = sub {
    my $pat = shift;
    my @got;
...
package Whatever;

print <[a-z_]+\.pm>;  #show all pragmas in the current directory