#!** perl **      (replace with $^X on target machine)

package main;
use strict;
use warnings;