03. 関数と返り値

#!/usr/bin/perl

use warnings;

# サブルーチンの呼び方は、「&」をつける

$sum = &test0(1,2);

print "$sum\n";

# 配列の返り値を変数受け（要素数を受け取る）

$a0 = &test1;

# 配列の返り値を配列受け

@a1 = &test1;

print "$a0\n";

foreach $tmp(@a1){

  print "$tmp\n";

}

# 複数の返り値

($b0,$b1) = &test2;

print "b0=$b0, b1=$b1\n";

exit;

### サブルーチン

# 引数２つ受け

sub test0 {

  ($a,$b) = @_;

  return $a+$b;

}

# 返り値が配列

sub test1 {

  @array = (1,2,3,4,5);

  return @array;

}

# 返り値が複数

sub test2 {

  return 6,7;

}

#!/usr/bin/ruby -w

### メソッド

# 引数２つ受け

def test0(a,b)

  return a+b

end

# 返り値が配列

def test1

  array = [1,2,3,4,5]

  return array

end

# 返り値が複数

def test2

  return 6,7

end

sum = test0(1,2)

puts sum

a0 = test1

a0.each {|num|

  puts num

}

b0,b1 = test2

puts "b0=%d, b1=%d" %[b0,b1]

#!/usr/bin/python

def test0(a,b):

    return a+b

def test1():

    array = [1,2,3,4,5]

    return array

def test2():

    return 6,7

sum = test0(1,2)

print sum

a0 = test1()

for num in a0:

    print num

b0,b1 = test2()

print "b0=%d, b1=%d" %(b0,b1)