Add $* for filename base

[conv.git] / conv.pl

diff --git a/conv.pl b/conv.pl
index 50d205d..5904405 100755 (executable)
--- a/conv.pl
+++ b/conv.pl
@@ -38,6 +38,7 @@ sub convert {
     my $infile = "$base.$iext";
     $infile =~ s/"/\\"/g;
     $cmd =~ s!\$\<!"$infile"!g;
+    $cmd =~ s!\$\*!"$base"!g;
     my $outfile;
     if ($opts{o}) {
         if ($dirout) {