for @list -> $a {
    # here $a is local'ized in the perl 5 sense
}