PROGRAM = perl
PATH = '.' + %PATH%
foreach PATH in %PATH% {
    foreach EXTENSION in %PATHEXT% {
        TRY PATH\perl.EXTENSION
    }
}