/* REXX */
/* change to drives and directories that exist on your system */
/* adjust path to test script */
'F:'
cd '\ecs'
'G:'
/* don't use the same name as above */
cd '\BIN'
say 'Should output File::Spec->rel2abs(F:testpl.cmd) = F:/ecs/testpl.cmd'
perl 'h:\utility\testrel2abs.pl'