open my $fds[$_], '<', "datafile$_" or die $!;

##</code><code>##

    my $line = <$fds[$fdn]>;