
안녕하세요.
이 프로그램은 마일을 킬로미터로,킬로미터를 마일로 바뀌는 프로그램입니다.
한 번 해 보세요.
재미있습니다.
---------------------------------------------------
#!/usr/bin/perl
print ("Enter the distance to be converted:\n");
$originaldist = ;
chop ($originaldist);
$miles = $originaldist * 0.6214;
$kilometers = $originaldist * 1.609;
print ($originaldist, " kilometers = ", $miles,
       " miles\n");
print ($originaldist, " miles = ", $kilometers,
       " kilometers\n");