Hej Ole. > while(<DATA>) { > $line++; > @values=split(/\s+/,$_); > @sslug@sslug@values; > } Det tog lidt tid at decifrere koden, men det virker præcist efter hensigten. Tak! Mvh, Claus