use strict;
use warnings;

{
    print "\$0 = $0\n";
    print "\$ARGV[0] = $ARGV[0]\n";
}