do subname() is deprecated, so update this hunk of test dating from perl 1.
[p5sagit/p5-mst-13.2.git] / h2pl / eg /
drwxr-xr-x ..
-rw-r--r-- sizeof.ph
drwxr-xr-x sys
-rw-r--r-- sysexits.pl