Do you know where your variables are? | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
OK, in light if this discussion, I have a similar problem.
I need help, I have a script that i am trying to do the following: file1= list of unique ID numbers file2= list of unique html code with the unique ID numbers within the code per line(about 16k-bytes each seperated by carage. Both are standard text files. =========== #!/usr/bin/perl #read each line in test1.txt into data_file array $data_file="test1.txt"; open(DATA, $data_file) || die("Could not open file!"); @data_file=<DATA>; #read each line in code.txt into a names_file array $names_file="code.txt" open(NAMES, $names_file) || die("Could not open file!"); @names_data=<NAMES>; #create loop that reads each ID in code.txt (NAMES array), searches for each in array elements for #test1.txt (DATA array), redirects a new (NAMES).html for each element foreach ( $NAMES ) { chomp($NAMES); ($NAMES=$DATA<0> > +("$NAMES<0>.html")); } close NAMES; close DATA; I am new to perl but this is absolutely riddled with errors and I have written this according to examples of similar scripts. In reply to Re^3: Efficient file handling (was Re^3: trouble parsing log file...)
by Anonymous Monk
|
|