Miles to Kilometres conversion and vice versa

Script

#!/usr/bin/perl

print ("Enter the distance to be converted from Miles to Kilometres and vice versa: ");
$originaldist = <STDIN>;
chop ($originaldist);
$miles = $originaldist * 0.6214;
$kilometres = $originaldist * 1.609;
print ($originaldist, " Kilometres = ", $miles, " Miles \n");
print ("$originaldist", " Miles      = ", $kilometres, " Kilometres \n");
print ("\n");

Execution

Enter the distance to be converted from Miles to Kilometres and vice versa: 100
100 Kilometres = 62.14 Miles
100 Miles      = 160.9 Kilometres

Enter the distance to be converted from Miles to Kilometres and vice versa: 50

50 Kilometres = 31.07 Miles

50 Miles      = 80.45 Kilometres

Enter the distance to be converted from Miles to Kilometres and vice versa: 15

15 Kilometres = 9.321 Miles

15 Miles      = 24.135 Kilometres