Select Code to Download

#!/usr/bin/perl -w
                                                                      
+          
...
}
                                                                      
+          
print "Location 3, x = $x\n";

Location 1, x = 15
Location 2, x = 22
Location 3, x = 15