Help for this page

Select Code to Download

Select or download this

my $StartDir = shift || die "Usage: $0 <startdir>\n";

Select or download this

my $StartDir = shift @ARGV || die "Usage: $0 <startdir>\n";