in reply to Using perlclass 'methods'
method gear_inches { return ratio * $rim + ($tire * 2); } [download]
Try instead (call it incomplete implementation or anything else) ...
method gear_inches { return ($self->ratio() * $rim) + ($tire * 2); } [download]