Select Code to Download

use strict;
use warnings;
...
__DATA__
,,,,,,,,,,,,,,,,,,,,,,,,,"First Name: Dobbin Last Name: David L. Addre
+ss: david@adamsonanddobbin.com City: PO Box 1326407 Pido Road State: 
+Peterborough ZIP Code: ON Country: K9J 7H5 First Name: Dobbin Last Na
+me: David L. E-mail: david@adamsonanddobbin.com Address: PO Box 13264
+07 Pido Road City: Peterborough State: ON ZIP Code: K9J 7H5",,,,,,Hom
+e,743 7790,Other,742 4524,Work,745 5751,,,,,,,,,,,Adamson And Dobbin 
+Ltd. Mechanical Contractors,,General Manager,,,,,,,,,,,
,,,,,,,,,,,,,,,,,,,,,,,,,"First Name: Chapleau Last Name: Kathy, Ken A
+ddress: 666 FrankFirst Name: Chapleau Last Name: Kathy, Ken City: 666
+ Frank",,,,,,Home,876-9863,,,,,,,,,,,,,,,Admiralty Hall,,Accountant,,
+,,,,,,,,,

$VAR1 = {
          'First Name' => 'Dobbin',
...
          'Last Name' => 'Kathy, Ken',
          'City' => '666 Frank'
        };