On Thu, Oct 23, 2014 at 10:29:11AM -0700, Joe Perches wrote:[...]> my $P = $0;> -$P =~ s@(.*)/@@g;> -my $D = $1;> +my $D = dirname(abs_path($P));That changes the value of $P, I don't know if that is intended: my $D = dirname(abs_path($0));or my $D = abs_path($1);perhaps to keep $P as it was.-apw