Your problem is when you get the arguments for new: when you do $obj=Send->new($name); the subroutine gets _2_ arguments: the class name ("Send") amd $name. so the new method should start with