one-liner: drukuje wszystkie linie z wyjątkiem ostatnich 3?

Chciałbym symulować GNUhead -n -3, który drukuje wszystkie linie z wyjątkiem ostatnich 3, ponieważhead w FreeBSD nie ma tej funkcji. Więc myślę o czymś takim

seq 1 10 | perl -ne ...

Tutaj użyłem 10 linii, ale może to być dowolna liczba większa niż 3.

Czy można to zrobić w Perlu lub w inny sposób na FreeBSD w BASH?

Byłoby super prymitywnym rozwiązaniem

seq 1 10 | sed '$d' | sed '$d' | sed '$d'

questionAnswers(10)

yourAnswerToTheQuestion