Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use warnings;
...
open(CHILD, "ls -la |") or die "Can't open: $!";
}
  2. or download this
    #!/usr/bin/perl
use warnings;
...
          $widget->yview('end');
}
  3. or download this
    #!/usr/bin/perl
$|++;
...
        sleep 1;
    }