package Calc_Use; use strict; use warnings; sub new { bless {}, shift; } sub add { } sub mul { } sub div { } 1;