'Subroutine parameter'에 해당되는 글 1건

  1. 2014.12.19 [Perl] Subroutine parameter
Perl2014.12.19 15:21

전달된 2개의 인수의 차(의 절대값)을 값으로서 되돌려주는 서브루틴을 작성해여라. 동작을 확실히 하기위해, 마땅한 호출을 해보자


use strict;

use warnings;


my $num1;

my $num2;


print "Please enter the 2 number. ";


$num1 = <STDIN>;

chomp $num1;

$num2 = <STDIN>;

chomp $num2;


print "result : " . CalAbsolute ($num1, $num2) .  "\n";


sub CalAbsolute {

my ($num1, $num2) = @_;


return (abs($num1 - $num2));

}



7-b.pl


신고

'Perl' 카테고리의 다른 글

[Perl] 재귀함수  (0) 2014.12.19
[Perl] 홀수 짝수 Subroutine  (0) 2014.12.19
[Perl] Subroutine parameter  (0) 2014.12.19
[Perl] Subroutine  (0) 2014.12.19
[Perl]STDIN, while, for, if  (0) 2014.11.19
[Perl]for, if  (0) 2014.11.19
Posted by Namseungil

티스토리 툴바