% cat aap2 0aap 0noot 1mies 2mies 3mies 0aap 0noot 1mies 6mies % perl -nle 'print if (/^1/...!/^0/)' aap2 1mies 2mies 1mies 6mies ####