perl -d PROGRAM

##</code><code>##

b 185

##</code><code>##

c

##</code><code>##

p $variable1, " ", $variable2, " ", $variable3

##</code><code>##

s