if (/^1\s+/) {
    print FILE, "$_\n";
}