#! d:\perl\bin\perl.exe -w
use strict;

print "\nbegin:\n";
print @ARGV;
print "\nend:\n";
open (paraTmp,"> ptmp.txt");
print paraTmp "\nbegin:\n";
print paraTmp @ARGV;
print paraTmp "\nend:\n";

close paraTmp;
exit;