sub createCallTestcaseXML { my $name3 = $_[0]; my $phoneID = $_[1]; my $callNumber = $_[2]; ...