print NEW substr($_,5),"\n";