Modified perl script to warn about existing reads ffiles