Help for this page
perl -MFile::Tail -E '$f = File::Tail->new(q[/var/log/foo/bar.log]); p
+rint $l while $l = $f->read'
perl -MFile::Tail -E '$f = File::Tail->new(name=> q[/var/log/foo/bar.l
+og], tail=>10, maxinterval=>0.5); print $l while $l = $f->read'
1. Keep it simple
2. Just remember to pull out 3 in the morning
3. A good puzzle will wake me up
Many. I like to torture myself
0. Socks just get in the way
Results (330 votes). Check out past polls.