Оп,работает...а почему мой не работает не пойму.Всё же правильно вроде.

ЗЫ: А что такое print $/ unless $_ % 1; ?