my $path = shift or die "No path passed to GetInfDataFiles\n"

##</code><code>##

my $path = shift;
die "No path passed to GetInfDataFiles\n" unless $path;