[tpm] eval oddness

Madison Kelly linux at alteeve.com
Thu Dec 10 07:44:27 PST 2009

Dave Doyle wrote:
> I do not think that means what you think that means. :)

Oops, meant to include the code they use in their docs:

use base qw(Net::DBus);

sub new {
       my $class = shift;
       my $service = shift;
       my $self = $class->SUPER::new($service, "/music/player/manager");

       bless $self, $class;

       return $self;


More information about the toronto-pm mailing list