Array Perl

  1. Home
  2. Perl
  3. Array
  4. Using the backslash operator on arrays
#!/usr/bin/perl 
$pointer = \@ARGV; 
printf "\n Pointer Address of ARGV = $pointer\n"; 
$i = scalar(@$pointer); 
printf "\n Number of arguments : $i \n"; 
$i = 0; 
foreach (@$pointer) { 
    printf "$i : $$pointer[$i++]; \n"; 
}