Select Code to Download

Subroutine fileparse_set_fstype redefined at C:/Program
    Files/Perl/lib/File/Basename.pm line 152 (#1)
...
        no warnings;
        eval "sub name { ... }";
        }

use strict;
use warnings;
...
  sub foo { print 'y' }
}
foo();