my $start_dir = shift || die "missing arg";

##</code><code>##

my $start_dir = shift || '.';