in reply to Tailing A Swapped File

perl -MFile::Tail -e'$|++;$r=tie *F,"File::Tail",(name=>"/var/log/messages");while(<F>){print}'

See File::Tail.