Help for this page

Select Code to Download


  1. or download this
    use strict;
    
    ...
    print "$temp\n";
    $temp = @array[0..2];
    print "$temp\n";
    
  2. or download this
    3
    baz
    foo
    foo
    baz
    
  3. or download this
    sub func1
    {
    ...
        my @array = ('foo', 'bar', 'baz');
        return @array;
    }