D&C GLug - Home Page

[ Date Index ] [ Thread Index ] [ <= Previous by date / thread ] [ Next by date / thread => ]

[LUG] Xmas perling

 

Can any one see the syntax error in this perl script?

#!/usr/bin/perl

$word ="/usr/share/dict/words";


if ($word
=~ /([^aeiou]*a[^aeiou]*e[^aeiou]*i[^aeiou]*o[^aeiou]*u[^aeiou]*)/)
{ print "$1\n"; }



I have the last question of my Family xmas quiz as how many words with
all the vowels in and in the order of a e i o u 

I think this script will do it but I get a syntax error [kevin@kevinspc
devtest]$ perl -c aeiou.pl 
syntax error at aeiou.pl line 6, near ");"

Regards

Kevin Lucas
Minions Post Master(Sub) reprieved (possibly!)
Po House, Minions,
Liskeard Cornwall 
PL14 5LE
01579363386


-- 
The Mailing List for the Devon & Cornwall LUG
http://mailman.dclug.org.uk/listinfo/list
FAQ: http://www.dcglug.org.uk/linux_adm/list-faq.html