auth(); @uidls=getuidls(); foreach $uidl (@uidls) { fork || getmail($uidl); };