i am trying to write a simple program that splits text, but when I output the 
results I end up with SCALAR(0x15d4ee8) all over the place. Is there any way to 
stop this? also, it appears in the output, but oddly if i write the output to a 
file, import it, and try to s/ it out, it remains there. I know its a bit messy 
and I will clarify my variables later, but this should work shouldnt it? Thanks 
~BJ

code:

open(IN,"a.html");
@in=<IN>;
close IN;
open(OUT,">references.txt");
$big=join(\n,@in);
$a='<h3>References</h3>';
@first=split/$a/,$big;
$second=$first[1];
if($second=~/<h3>/)[EMAIL PROTECTED]/<h3>/,$second;}
[EMAIL PROTECTED]/<hr>/,$second;}
$forth=$third[0];
$b='</p>';
@refs=split/$b/,$forth;
$,="\n";
$v='&ndash';
print @refs;

"Nequaquam Vacuum"


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to