#!/usr/bin/perl
use Data::Dumper;
print Dumper(\@ARGV);