#!/usr/bin/perl

my $isHeader = 1;
my $targetDate = 20161002;

foreach (<STDIN>){
    if (!$isHeader){
    my ($M12,$M11,$M481,$M55,$M989) = split(' ',$_);
    if ($M11 <= $targetDate){
        print $_;
    }
    }
    $isHeader = 0;
}