in reply to split file and put contents in variables?

You can either split into an array variable or 3 separate variables: 
my @entries = split /\s+/, $line;
my ($x, $y, $z) = split /\s+/, $line;

[download]

In Section Seekers of Perl Wisdom