Split words : Split « String « Perl

Split words

     


#!/usr/bin/perl
use warnings;
use strict;

my @words;
push @words, split foreach(<>);
print scalar(@words), " words: @words \n";

1.	Split string into separate words, and then test to see if each word is the one we're looking for.
2.	Split up
3.	A simple word-count program.
4.	Using split function to split a string
5.	Split string with ','
6.	Find a word after splitting a string
7.	Keeping the separators by having them in parentheses.