(C) 2003, Tim Maher       1-29       www.TeachMePerl.com
Converting Miles to Kilometers
Using Perl's "eval" in a Substitution


$ cat drive_dist
            Van       Win       Tor 
Vancouver   0         1380      2790
Winnipeg    1380      0         1300
Toronto     2790      1300      0

$ special_perl_command  drive_dist
            Van       Win       Tor 
Vancouver   0         2208      4464
Winnipeg    2208      0         2080
Toronto     4464      2080      0
$