I think there is nothing to read in this "fifo". The process is waiting for a CR which is never arriving.

For your tests use a textfile instead of "fifo".

Use a string $read instead of a array @read.

If this is unsuccessful use the debug-mode of the perl-interpreter.

Good luck

rolf