Word Searching

[Nuxx]

Hi!
I would like to know if anyone can help me build a PerlScrit to identify words inside a .txt file and write it in a HTML file.I´m a little rookie with perl

Thanks

 

[goBoating]

Hello nuxx,
welcome to TTs. This is pretty basic stuff. You can see some decent tutorials at

http://www.perl.com.

They have a pull down in the upper right corner. Go to tutorials and take your pick.

You want to open a text file,
search for a given word,
print that word into a new file.

#!perl
# open  a text file - store it in $buffer
open(IPF,&quot;<some_file_name&quot;) or 
            die &quot;Failed to open input file, $!\n&quot;;
while (<IPF>) { $buffer .= $_; }
close IPF;

# open an output file to write to.
open(OPF,&quot;>some_other_file_name&quot;) or 
            die &quot;Failed to open output file, $!\n&quot;;

# search for a given word
$search_word = 'the';  # probably find that one once of twice
while ($buffer =~ /\b$search_word\b/i) { print OPF &quot;the\n&quot;; }

close OPF;

HTH


keep the rudder amid ship and beware the odd typo