(Note: this is simply a friendly suggestion that some attempt be made to understand the program/problem when you post.)

ALL HAIL BRAK!!!

PsychoSpunk this is my second day tring to program in perl since the program wasnt running correctly i did try to fix the problem but since i dont have any experience in perl thats alittle hard without the help of you guys(fellow monks). thanks for your help snowrider

So it is always a good practice to enable warnings in your script when you are programming for testing...

#!/usr/bin/perl -w
[download]

that way you can "see" where the problem is happening

---

Chady | http://chady.net/

select(FILE);
print $text;
print "blah blah blah\n";
[download]

Update:
Snowrider - This is assuming you have multiple files open and are printing to them as you go... and as I know the basic tasks you will have to perform as you come up to speed with Perl... this might be useful to you.

i.e.,

open DRILL_FILE, ">$drill_file";
open ROUT_FILE, ">$rout_file";
select(DRILL_FILE);
print "stuff...\n";
select(ROUT_FILE);
print "other stuff...\n";
[download]

Prost,
Moe