References to subroutines. : Subroutine Reference « Subroutine « Perl

1. Perl
2. Subroutine
3. Subroutine Reference

References to subroutines.

   
#!/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); 

   
    
    
  

Related examples in the same category