#define ADD(x,y) x + y my $r = ADD( getPfromSomewhere(), getQfromSomewhere() ); ... my $s = ADD( geta(), getb() );