ActivePerl requires a parm for getopt.
This commit is contained in:
1 parent
5fe61d39ef
commit
bdd672cbaf
2 files changed
+2
-2
No files matched your search
+1
-1
@@ -6,7 +6,7 @@
|
||||
|
||||
use File::Path;
|
||||
use Getopt::Std;
|
||||
getopt();
|
||||
getopt "";
|
||||
|
||||
foreach $dir ( @ARGV )
|
||||
{
|
||||
|
||||
+1
-1
@@ -6,7 +6,7 @@ use File::Path;
|
||||
use File::Find;
|
||||
use Getopt::Std;
|
||||
|
||||
getopt();
|
||||
getopt "";
|
||||
|
||||
foreach $arg ( @ARGV )
|
||||
{
|
||||
|
||||
Reference in new issue
Block a user