AI-MicroStructure

 view release on metacpan or  search on metacpan

bin/linksearch  view on Meta::CPAN

mojo get "https://www.google.com/search?q=$1&aqs=chrome..69i57j69i60.211j0j1&sourceid=chrome&es_sm=122&ie=UTF-8" a attr href | egrep "^\/url" | sed -s "s/^.*.q=http/http/" | sed -s "s/\&sa=.*$//"| grep -v google

bin/linksearch~  view on Meta::CPAN

mojo get "https://www.google.com/search?q=$1&aqs=chrome..69i57j69i60.211j0j1&sourceid=chrome&es_sm=122&ie=UTF-8" a attr href | egrep "^\/url" | sed -s "s/^.*.q=http/http/" | sed -s "s/\&sa=.*$//"| grep -v google

bin/newssearch  view on Meta::CPAN

mojo get "https://www.google.com/search?q="$1"&tbm=nws&aqs=chrome..69i57j69i60.211j0j1&sourceid=chrome&es_sm=122&ie=UTF-8" a attr href | egrep "^\/url" | sed -s "s/^.*.q=http/http/" | sed -s "s/\&sa=.*$//"| grep -v google

lib/AI/MicroStructure/WordBlacklist.pm  view on Meta::CPAN

our @ISA = qw(Exporter);

our %EXPORT_TAGS = ( 'all' => [ qw( getStopWords ) ] );
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );

sub getStopWordsSmall{
my @search = ("a","a's","able","about","above","according","accordingly","across","actually","after","afterwards","again","against","ain't","all","allow","allows","almost","alone","along","already","also","although","always","am","among","amongst","a...
return @search;
}
sub getStopWords {
if ( @_ and $_[0] eq 'UTF-8' ) {
# adding U0 causes the result to be flagged as UTF-8
my %stoplist = map { ( pack("U0a*", $_), 1 ) } qw(
a able about above according accordingly across actually after afterwards again against aint all allow allows almost alone along already also although always am among amongst an and another any anybody anyhow anyone anything anyway anyways anywhere a...
b be became because become becomes becoming been before beforehand behind being believe below beside besides best better between beyond both brief but by
c came can cannot cant cant cause causes certain certainly changes clearly cmon co com come comes concerning consequently consider considering contain containing contains corresponding could couldnt course cs currently
d definitely described despite did didnt different do does doesnt doing done dont down downwards during
e each edu eg eight either else elsewhere enough entirely especially et etc even ever every everybody everyone everything everywhere ex exactly example except
f far few fifth first five followed following follows for former formerly forth four from further furthermore
g get gets getting given gives go goes going gone got gotten greetings
h had hadnt happens hardly has hasnt have havent having he hello help hence her here hereafter hereby herein heres hereupon hers herself hes hi him himself his hither hopefully how howbeit however
i id ie if ignored ill im immediate in inasmuch inc indeed indicate indicated indicates inner insofar instead into inward is isnt it itd itll its its itself ive