in reply to Perl script not running correct as a cron

Maybe your oracle environment is not setup properly. Check DBI, DBD::Oracle and LD_LIBRARY_PATH

print+qq(\L@{[ref\&@]}@{['@'x7^'!#2/"!4']});