Help for this page

Select Code to Download


  1. or download this
    package mymod;
    use warnings;
    ...
    print "The cursor is at: $pt->{x}, $pt->{y}\n";
    
    1;
    
  2. or download this
    D:\pscrpt>perl mymod.pm
    The cursor is at: 584, 1017
    
    D:\pscrpt>perl mymod.pm
    The cursor is at: 213, 542
    
  3. or download this
    use warnings;
    use mymod;
    
  4. or download this
    D:\pscrpt>perl test.pl
    Win32::API::parse_prototype: WARNING unknown output parameter type 'BO
    +OL' at D:/
    ...
    Use of uninitialized value in concatenation (.) or string at mymod.pm 
    +line 21.
    The cursor is at: ,