#!/usr/bin/perl

while(<>) {
    s/\r\n$//;
    s/^\d+ //;
    print $_,"\n" 
}