I'm a dinosaur. In lieu of your

some_function_call($var);
#$# warn Dumper($var);

#$#DEBUG
some_function_call();
another_function_call();
#$#END
[download]

I'd use:

my $DEBUG = 0;

some_function_call($var);
Dumper($var) if $DEBUG > 0;

if ( $DEBUG >= 5 ) {
  some_function_call();
  another_function_call();
}
[download]

I normally include $DEBUG in my Getopt, so I can determine the level of debugging at run-time.