my $data1 = $ARGV[0];
my $data2 = $ARGV[1];
my $data3 = $ARGV[2];