#!/usr/bin/perl exec $^X, "-Mperl5i::cmd=$0", @ARGV;