:WinNT perl -x -S %0 %*