It appears the Net::FTP is handling our variables from the script a bit differently. Short story, I modified that piece of our script and it works.
Error snippet of code:
$ftp = Net::FTP->new(@ARGV[0],5) or exit(1);
Working snippet of code:
$ftp = Net::FTP->new(@ARGV[0]) or exit(1);
Thanks all for the great hints and advice.