#!/usr/bin/perl -w
*ARGV = *DATA{IO};
do "/usr/bin/perl/myscript.pl";
__DATA__