Select Code to Download

#!/usr/bin/perl -w
use strict;
...
system ("./$newfile ");

$ ./10.clone.pl 2.med 1.qy 1.pop
-------------
...
new file is 1.qy1.html
$