my ($center1, $center2) = center46('nogizaka');
print "$center1\n";
print "$center2\n";
sub center46 {
if ($_[0] eq 'nogizaka') {
return 'nanamaru', 'asyurin';
} elsif ($_[0] eq 'keyakizaka') {
return 'techi', '';
} else {
return 'error!', '';
}
}
実効結果
nanamaru
asyurin
print "$center1\n";
print "$center2\n";
sub center46 {
if ($_[0] eq 'nogizaka') {
return 'nanamaru', 'asyurin';
} elsif ($_[0] eq 'keyakizaka') {
return 'techi', '';
} else {
return 'error!', '';
}
}
実効結果
nanamaru
asyurin