Help for this page
#!/usr/bin/perl ... $scpe->scp($filelocation . '*', $remotedir); print "SCP complete\n";
scp /opt/work/reports/2009/* xferusr@server123.internal:/var/www/html/ +reports/2009