#Introduction
sub call_right {};

#starts here
BEGIN {
   $of = 'wisdom is'
}

&call_right($right,$things,@righttime);