@AofLines = ( 'this is line one', 'this is line two' );;

pp \@AofLines;;

[
    "this is line one", 
    "this is line two"
]

print $AofLines[ 0 ];;
this is line one

print +( split ' ', $AofLines[ 1 ] )[ 3 ];;
two