{   local $/ = '!';
    while (<>) {
        chomp;
        print "$_\n";
        last if 50_000 <= $.;
    }
}
print <>;