Your code contains several errors, which is to be expected of someone new to perl, it's $array[fieldnum] not @array[fieldnum] - add "use warnings;" and "use strict;" and you'll find several more (see Use strict warnings and diagnostics or die for more). A bigger question in my mind is why can't you use modules?