Use of uninitialized value $_[0] in substitution (s///) at /System/Library/Perl/5.18/File/Basename.pm line 341, <GEN0> line 10.
fileparse(): need a valid pathname