if ($DEBUG) { print STDERR "Debug: some value"; # some tempory line to debug our debuger ... # some other temp line ... } #### do { print STDERR "Debug: some value"; # some temporary line # some other temporary line } if $DEBUG;