8 lines
107 B
Perl
8 lines
107 B
Perl
use Getopt::Long;
|
|
|
|
GetOptions("file=s" => \$file);
|
|
|
|
if ($file) {
|
|
print "File name: $file\n";
|
|
}
|