#!perl

use strict;
use warnings;

use 5.010;

say "\n\nBin in $0";
say "\@ARGV: '@ARGV'"