perl -MO=Deparse -e "print $n[inf]" print $n[0]; -e syntax OK