Perl 에서 쉬운 질문 하나... .

kevin0960의 이미지

use warnings; 
use strict;
my $yen;
my $exchange;
 
print "Currency converter Yen to pounds \n\n Please enter the exchange rate: ";
$yen = <STDIN>;
print "Please type the amount of money to exchange : ";
$exchange = <STDIN>;
print $exchange, " yen is ",($exchange/$yen), " pounds \n";

위와 같이 yen -> pound 환전 프로그램을 만들었는데요, 분명히 마지막 줄에서 print 할 때, $exchange 뒤에 "\n" 을 붙이지 않았음에도 불구하고 결과를 출력할 때 에는 줄바꿈이 되어 있어서

Currency converter Yen to pounds

Please enter the exchange rate : 10
Please type the amount of money to exchange : 20
20
yen is 2 pounds

와 같이 출력되네요.. 도대체 왜 인가요? 참고로 위 code 부분에서 가려진 부분은 입니다.

lifthrasiir의 이미지

<>로 읽은 줄 뒤에는 개행 문자(\n)가 포함되어 있어서 지워 줘야 합니다. 위의 코드 같은 경우 (= 뒤에 <>가 빠져 있는 거 맞죠?)

chomp ($exchange = <>);

와 같이 해 주시면 됩니다.
aero의 이미지

선언을 따로 안해도 됩니다.

my $exchange;
$exchange = <>;
chomp $exchange;


chomp( my $exchange = <> );

로 줄여쓸 수 있습니다.