local $\="\n";
print('a');
do {
   print('b');
   last;
   print('c');
};
print('d');