use File::Copy; use Getopt::Std; use IO::Handle;