Select Code to Download

#!/usr/bin/perl

...

      close FIFO_IN  or die "Problems closing FIFO writer: $!";
      close FIFO_OUT or die "Problems closing FIFO reader: $!";