Re: How can I see a CPAN module's print message

If this code is in a package called "TieRegistry", you will not see the output from print statements outside of any methods (subroutines) in that module just by typing "use TieRegistry"

If the print statements are in a subroutine in the package TieRegistry:

package TieRegistry;
use strict;
use Carp;

sub new
{
  my $class = shift;
  my $self = bless {}, $class;
}

sub PrintThis
{
  print "my print message\n";
}
[download]

And then in your main program, after "use TieRegistry", you had:

my $test = TieRegistry->new;
$test->PrintThis;
[download]

The line "my print message" would print.

Comment on Re: How can I see a CPAN module's print message Select or Download Code

Replies are listed 'Best First'.
Re^2: How can I see a CPAN module's print message by anaconda_wly (Scribe) on Jan 06, 2013 at 09:06 UTC
But why? As I can do it like this: MyPackage.pm `use strict; use warnings; { package MyPackage; use Carp; carp "print message"; } 1;` [download] main.pl `use MyPackage; &main; sub main { }` [download]	[reply] [d/l] [select]
Re^3: How can I see a CPAN module's print message by Corion (Patriarch) on Jan 06, 2013 at 09:20 UTC
Also consider that Perl will load the first file `TieRegistry.pm` it finds in `@INC`. Inspect the values of `%INC` to find out which file Perl loaded, and which one you edited. See perlvar and Data::Dumper. `use TieRegistry; print Dumper \%INC;` [download]	[reply] [d/l] [select]
Re^3: How can I see a CPAN module's print message by tobyink (Canon) on Jan 06, 2013 at 10:01 UTC
That line will print because it's not in a sub. A line inside a sub can only print when that sub is actually executed. (The exception to this rule being a line that is evaluated at compile time. But it would be unusual to do this.) `perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'`	[reply]
Re^4: How can I see a CPAN module's print message by anaconda_wly (Scribe) on Jan 06, 2013 at 10:15 UTC
Yes, so my print or carp in file scope(I mean not in any sub) should print the message if I "use" it I think.	[reply]
Re^3: How can I see a CPAN module's print message by Anonymous Monk on Jan 06, 2013 at 09:15 UTC
well, filehandles can be redirected, die/warn can be trapped, see %SIG, Carp::Always, Devel::Trace ...	[reply]


good chemistry is complicated, and a little bit messy -LW
	PerlMonks