sub juliette {
romeo();
romeo();
for $thou (@are) { /romeo/; }
}
[download]

Greetz
Beatnik
... Quidquid perl dictum sit, altum viditur.