Hyperliked to what?
Untested, YMMVwhile (my $line=<$fh>) { chomp $line; for($line) { s/\&//g; s/[\\\_\@\_]//g; s/COMMENT//g; } my @data = split /:/, $line; my $class = $data[0] ? 'normal' : 'bold'; print $fh_out qq[<tr class="$class">]; for my $word(@data){ print $fh_out '<td><a href="' .$href_to_what{$word} .'">' .$word .'</a></td>'; } print $fh_out "</tr>\n"; }
In reply to Re: How to add hyperlink for every table data using perl?
by huck
in thread How to add hyperlink for every table data using perl?
by finddata
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |