#!/usr/bin/perl
use Net::SCP;
$scp = Net::SCP->new ( "beta.kanja.gc.au", "guestUser");
$scp->cwd("/beta/path/router/files/") or die $scp->{errstr};
open(rtrList, "/alpha/path/list_of_files.lst");
while(<rtrList>)
{
       chomp;
       $file = $_;
       $scp->put("$file") or die $scp->{errstr};
}
close(rtrList);

##</code><code>##

Your "cron" job on Alpha
/alpha/script_path/fileXfr.pl > /tmp/fileXfr.log 2>$1

produced the following output:

open3: exec of scp -pqB /alpha/absolute/path/file1.cfg guestUser@beta.kanja.gc.au:/beta/path/router/files/file1.cfg
failed at /usr/perl5/site_perl/5.6.1/Net/SCP.pm line 93