#!/usr/bin/perl use warnings; use strict; open( LIST, "stopwords.txt" ) or die "$!"; my %stopwords = map { chomp; $_ => 1 } <LIST>; close LIST; while (<>) { chomp; for (split) { print unless $stopwords{$_}; } }
In reply to Re^5: can you please fix the error
by Joost
in thread can you please fix the error
by zulqernain
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |