$ perl t.t one two three
1..1
$ARGV = [
          'one',
          'two',
          'three'
        ];
ok 1 - placeholder
$