'a'=~/(.)/;
print("$1\n");           # a
while ( 'b'=~/(.)/ ) {
   print("$1\n"),        # b
   last;
}
print("$1\n");           # a