my %hash = map { split /delim/, $_, 2  } @line;
[download]

Cheers,
Ovid

Join the Perlmonks Setiathome Group or just click on the the link and check out our stats.