You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
#!/usr/bin/perl
|
|
sub print_coor{
|
|
my ($x,$y,$z) = @_;
|
|
print "$x $y $z \n";
|
|
return $x;
|
|
};
|
|
$k = 1;
|
|
$j = 2;
|
|
$m = 4;
|
|
$this = print_coor($k,$j,$m);
|
|
$that = print_coor(4,5,6); |