Just got this working.  Next release will have...

  my @isa      = $mod->superclasses;
  my %methods  = $mod->class_method_calls
  my @methods  = $mod->object_method_calls;
  my @functions= $mod->function_calls;

  # Check for constructs which make perl hard to predict.
  my %methods   = $mod->dynamic_method_calls;
  my @lines     = $mod->eval_string;
  my @lines     = $mod->gotos;
  my %controls  = $mod->exit_via_loop_control;

I'm likely also going to change the interface of packages_inside() and
modules_used() to be more like subroutines so I can pack more info
into it (like line numbers).


Found class method call to binmode via main::STDOUT at /usr/share/perl5/CGI.pm line 182
Found class method call to binmode via main::STDIN at /usr/share/perl5/CGI.pm line 183
Found class method call to binmode via main::STDERR at /usr/share/perl5/CGI.pm line 184
Found object method call to add_parameter at /usr/share/perl5/CGI.pm line 559
Found class method call to request via Apache at /usr/share/perl5/CGI.pm line 269
Found object method call to register_cleanup at /usr/share/perl5/CGI.pm line 270
Found class method call to request via Apache at /usr/share/perl5/CGI.pm line 270
Found object method call to _reset_globals at /usr/share/perl5/CGI.pm line 273
Found object method call to init at /usr/share/perl5/CGI.pm line 274
Found object method call to new at /usr/share/perl5/CGI.pm line 329
Found object method call to _setup_symbols at /usr/share/perl5/CGI.pm line 247
Found object method call to param at /usr/share/perl5/CGI.pm line 540
Found object method call to charset at /usr/share/perl5/CGI.pm line 545
Found object method call to param at /usr/share/perl5/CGI.pm line 369
Found object method call to charset at /usr/share/perl5/CGI.pm line 371
Found object method call to charset at /usr/share/perl5/CGI.pm line 382
Found object method call to cgi_error at /usr/share/perl5/CGI.pm line 388
Found object method call to read_multipart at /usr/share/perl5/CGI.pm line 400
Found object method call to query_string at /usr/share/perl5/CGI.pm line 408
Found object method call to param at /usr/share/perl5/CGI.pm line 413
Found object method call to args at /usr/share/perl5/CGI.pm line 443
Found class method call to request via Apache at /usr/share/perl5/CGI.pm line 443
Found object method call to read_from_client at /usr/share/perl5/CGI.pm line 453
Found object method call to parse_params at /usr/share/perl5/CGI.pm line 472
Found object method call to add_parameter at /usr/share/perl5/CGI.pm line 475
Found object method call to parse_keywordlist at /usr/share/perl5/CGI.pm line 476
Found object method call to param at /usr/share/perl5/CGI.pm line 482
Found object method call to param at /usr/share/perl5/CGI.pm line 488
Found object method call to delete at /usr/share/perl5/CGI.pm line 493
Found object method call to delete at /usr/share/perl5/CGI.pm line 494
Found object method call to save_request at /usr/share/perl5/CGI.pm line 496
Found object method call to all_parameters at /usr/share/perl5/CGI.pm line 295
Found object method call to add_parameter at /usr/share/perl5/CGI.pm line 313
Found object method call to print at /usr/share/perl5/CGI.pm line 519
Found object method call to _make_tag_func at /usr/share/perl5/CGI.pm line 647
Found object method call to _setup_symbols at /usr/share/perl5/CGI.pm line 226

-- 

Michael G. Schwern   <[EMAIL PROTECTED]>    http://www.pobox.com/~schwern/
Perl Quality Assurance      <[EMAIL PROTECTED]>         Kwalitee Is Job One
It's Airplane Glue sniffing time!

Reply via email to