Help for this page

Select Code to Download


  1. or download this
    package Listen;
    require Tie::Handle;
    ...
    }
    
    1;
    
  2. or download this
    use listen;
    
    my $test = new Listen;