for ( 1,2,3,4 ) {
    print $_; # im ersten Durchlauf ist $_ 1, im zweiten 2, ...
}