Select Code to Download

$ perl -wMstrict -le 'print Time::HiRes::gettimeofday()'
Undefined subroutine &Time::HiRes::gettimeofday called at -e line 1.
...
Undefined subroutine &Cwd::getcwd called at -e line 1.
$ perl -wMstrict -le 'print utf8::valid("foo")'
1

$ perl -wMstrict -le '     print join ",", File::Glob::bsd_glob("{x,y}
+={a,b}")'
Undefined subroutine &File::Glob::bsd_glob called at -e line 1.
$ perl -wMstrict -le '<*>; print join ",", File::Glob::bsd_glob("{x,y}
+={a,b}")'
x=a,x=b,y=a,y=b

use warnings;
use strict;
...
        Foo::bar(2,3)==5 or die;
    },
});