Lines Matching refs:class
80 my $class = shift;
81 return if $fail{$class}{new} and $fail{$class}{new}--;
82 bless( { @_ }, $class );
87 my $class = ref($self);
88 return if $fail{$class}{'send'} and $fail{$class}{'send'}--;
120 my $class = shift;
121 return if defined $fail{$class}{new} and $fail{$class}{new}--;
122 bless({sock => shift}, $class);
127 my $class = ref($self);
128 return if defined $fail{$class}{can_read} and $fail{class}{can_read}--;