fix for older Perl which warns about a bug in File::Slurp

This commit is contained in:
Oliver Gorwits
2012-12-20 13:22:14 +00:00
parent e90b3c9d7a
commit b3c3897cb4

View File

@@ -1,5 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
# fix for older Perl which warns about a bug in File::Slurp
BEGIN {
no warnings 'portable';
use File::Slurp;
}
use FindBin; use FindBin;
use lib "$FindBin::Bin/../lib"; use lib "$FindBin::Bin/../lib";
use App::Netdisco; use App::Netdisco;