note
Krambambuli
Maybe your code should look somewhat like
<code>
#!/usr/bin/perl
my ($file1,$file2);
open(FILE1,"<$ARGV[0]");
while(<FILE1>)
{
chomp($_);
$file1 = $_;
$file1=~s/\s+//;
open(FILE2,"<$ARGV[1]");
while(<FILE2>)
{
print "<$file1> \n";
}
close FILE2;
}
</code>
?<br><br>
What output do you wish or expect?<br><br>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-600591">
<br>Krambambuli<br>
---<br>
</div></div>
820900
820908