Help for this page

Select Code to Download

Select or download this

while (1) {
    open(FIFO, ">$ENV{HOME}/.plan")
...
    close FIFO;
    sleep 1;
}