#!C:\strawberry\perl\bin\perl.exe -w

use strict;
use diagnostics;


print @ARGV;
print $#ARGV;
exit 0;