CALL PGM(PERLDIST/PERL) PARM('/home/test.pl')

CRTCLPGM PGM(TEST) SRCFILE(*LIBL/QCLSRC)

CRTCLPGM PGM(CGIBIN/TESTER) SRCFILE(QGPL/QCLSRC)