my $out = join '|', @fields[0..9] . "@" . $staticdir .$newfile;

print OUT "$out\n";