Help for this page

Select Code to Download

Select or download this

my $FIFO=undef;

...

close( $FIFO );
unlink $svitok_truby;

Select or download this

mkfifo( $svitok_truby, 0700 ) || die '&#1054;&#1096;&#1080;&#1073;&#10
+82;&#1072; &#1089;&#1086;&#1079;&#1076;&#1072;&#1085;&#1080;&#1103; &
+#1090;&#1088;&#1091;&#1073;&#1099;  '.$svitok_truby.'  : '.$!;

...

ReadMode 'normal';
unlink $svitok_truby;