Help for this page

Select Code to Download


  1. or download this
    use FindBin;
use lib $FindBin::Bin;
  2. or download this
    use FindBin;
use File::Spec::Functions qw/catdir/;
use lib catdir($FindBin::Bin, 'lib');
  3. or download this
    #!/usr/bin/perl -w
use 5.011;
...
  4. or download this
    ["abcdef", "abcdefg", "abcde", " bcdefgh", " bcd "]
["abcdef", "abcdef", "abcde ", " bcdef"]
...