Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re^2: Inline::C - object accessor failure

by sfink (Deacon)
on Oct 26, 2005 at 17:57 UTC ( [id://503126] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    package InlineTest;
    use strict;
    ...
    my $t = InlineTest->new( x => 'foo' );
    
    print $t->x, "\n";
    
  2. or download this
    sub Whiner::DESTROY { print "Dying!\n" }
    my $t = InlineTest->new( x => bless [], 'Whiner' );
    ...
    print $t->x, "\n";
    undef $t;
    print "Done.\n";