Select Code to Download

#!/usr/bin/perl -w
use strict; use warnings;
...

    move($fname,$mfname) or die "Move failed: $!";
}

Scalar found where operator expected at x937.pl line 32, near ")$}"
(Missing operator before $}?)
...
Global symbol "$fname" requires explicit package name at x937.pl line 
+80.
Unmatched right curly bracket at x937.pl line 81, at end of line
x937.pl has too many errors.