Help for this page

Select Code to Download


  1. or download this
    @AofLines = ( 'this is line one', 'this is line two' );;
    
    ...
    
    print +( split ' ', $AofLines[ 1 ] )[ 3 ];;
    two
    
  2. or download this
    @AofAofWords = ( [ qw[this is line one] ], [ qw[this is line two] ] );
    +;
    
    ...
    print join ' ', @{ $AofAofWords[ 1 ] };;
    this is line two