in reply to Using perlclass 'methods'

method gear_inches { return ratio * $rim + ($tire * 2); }

Try instead (call it incomplete implementation or anything else) ...

method gear_inches { return ($self->ratio() * $rim) + ($tire * 2); }