If there are only two lines, there is no need to split.

  my ($one, $two) = <$input>;
[download]

In list context, the <> operator returns a list.

Update: I completely misunderstood the question.