1.1 --- a/paypal/make.pl	Mon Jan 25 13:38:05 2010 -0500
     1.2 +++ b/paypal/make.pl	Wed Jan 27 22:04:43 2010 -0500
     1.3 @@ -13,7 +13,7 @@
     1.4  NAME   => 'big_acrylic_clear', 
     1.5  
     1.6  FIELDS      => ["Name", "Email"],
     1.7 -DEFAULTS      => ['James Bond','jbond@mi6.co.uk'],
     1.8 +DEFAULTS      => ['PERL::NAME','PERL::EMAIL'],
     1.9  
    1.10  COSTS_NAMES   => ['40 cards — $125', '4 cards — $30'],
    1.11  COSTS_CODE    => ['40 cards @125.00', '4 cards @30.00'],
    1.12 @@ -34,7 +34,7 @@
    1.13  NAME   => 'basic_acrylic_clear', 
    1.14  
    1.15  FIELDS      => ["Name", "Company","Occupation","Email"],
    1.16 -DEFAULTS      => ['James Bond','MI6','Secret Agent','jbond@mi6.co.uk'],
    1.17 +DEFAULTS      => ['PERL::NAME','PERL::COMPANY','PERL::OCCUPATION','PERL::EMAIL'],
    1.18  
    1.19  COSTS_NAMES   => ['40 cards — $125', '4 cards — $30'],
    1.20  COSTS_CODE    => ['40 cards @125.00', '4 cards @30.00'],
    1.21 @@ -56,7 +56,7 @@
    1.22  NAME   => 'classic_acrylic_clear', 
    1.23  
    1.24  FIELDS      => ["Email", "Phone","Name","Company","Occupation","Website"],
    1.25 -DEFAULTS      => ['jbond@mi6.co.uk','123.456.7890','James Bond','MI6','Secret Agent','http://www.jamesbond.com'],
    1.26 +DEFAULTS      => ['PERL::EMAIL','PERL::PHONE','PERL::NAME','PERL::COMPANY','PERL::OCCUPATION','PERL::WEBSITE'],
    1.27  
    1.28  COSTS_NAMES   => ['40 cards — $125', '4 cards — $30'],
    1.29  COSTS_CODE    => ['40 cards @125.00', '4 cards @30.00'],
    1.30 @@ -79,7 +79,7 @@
    1.31  NAME   => 'lines_acrylic_clear', 
    1.32  
    1.33  FIELDS      => ["Name", "Occupation","Company","Phone","Email","Website"],
    1.34 -DEFAULTS      => ['James Bond','Secret Agent','MI6','123.456.7890','jbond@domain.com','www.domain.com'],
    1.35 +DEFAULTS      => ['PERL::NAME','PERL::OCCUPATION','PERL::COMPANY','PERL::PHONE','PERL::EMAIL','PERL::WEBSITE'],
    1.36  
    1.37  COSTS_NAMES   => ['40 cards — $125', '4 cards — $30'],
    1.38  COSTS_CODE    => ['40 cards @125.00', '4 cards @30.00'],
    1.39 @@ -92,6 +92,26 @@
    1.40  
    1.41  
    1.42  
    1.43 +
    1.44 +
    1.45 +
    1.46 +
    1.47 +
    1.48 +
    1.49 +
    1.50 +##################################################################################################################################
    1.51 +
    1.52 +
    1.53 +
    1.54 +
    1.55 +
    1.56 +
    1.57 +
    1.58 +
    1.59 +
    1.60 +
    1.61 +
    1.62 +
    1.63  {#classic_acrylic_green
    1.64  &paylist
    1.65  (
    1.66 @@ -99,7 +119,7 @@
    1.67  NAME   => 'classic_acrylic_green', 
    1.68  
    1.69  FIELDS      => ["Line 1", "Line 2","Line 3","Line 4","Line 5","Side"],
    1.70 -DEFAULTS      => ['jbond@mi6.co.uk','123.456.7890','James Bond','MI6','Secret Agent','http://www.jamesbond.com'],
    1.71 +DEFAULTS      => ['PERL::EMAIL','123.456.7890','James Bond','MI6','Secret Agent','http://www.jamesbond.com'],
    1.72  
    1.73  COSTS_NAMES   => ['40 cards — $135', '4 cards — $30'],
    1.74  COSTS_CODE    => ['40 cards @135.00', '4 cards @30.00'],
    1.75 @@ -117,7 +137,7 @@
    1.76  NAME   => 'big_acrylic_green', 
    1.77  
    1.78  FIELDS      => ["Line 1", "Line 2"],
    1.79 -DEFAULTS      => ['James Bond','jbond@mi6.co.uk'],
    1.80 +DEFAULTS      => ['James Bond','PERL::EMAIL'],
    1.81  
    1.82  COSTS_NAMES   => ['40 cards — $135', '4 cards — $30'],
    1.83  COSTS_CODE    => ['40 cards @135.00', '4 cards @30.00'],