for my $fileIdx (1 .. 5) {
    my $fileName = "$temp$fileIdx";

    open $file, '>', fileName  or die "Failed to create fileName: $!\n";
    ...
}