Select Code to Download

1 #!/usr/bin/perl -w
  2 
...
 34 Lori Gortz: 327–832–5728: 3465 Mirlo Street, Peabody, MA 34756: 10
+/2/65: 35200
 35 Barbara Kerz: 385–57 3 –8326: 83 2 Ponce Drive, Gary, IN 83756: 12
+/15/46: 268500

:~/pbe/chap8$ ./exer1.pl 
...
Use of uninitialized value $name in split at ./exer1.pl line 19, <DATA
+> line 15.
Use of uninitialized value $lname in pattern match (m//) at ./exer1.pl
+ line 20, <DATA> line 15.