всем привет

Покажи текущий код. Помочь — пожалуйста, а вот решать за тебя никто не будет :)

Воспользуйся split:

my @digits = split ' ', $line;

Ну как успехи, получилось что-нибудь? Не забыл, что обещал здесь выложить решение? :)