print <<END_DEBUG if $DEBUG;

\$m   = $m
\$n   = $n
\$j   = $j
\$row = $row

END_DEBUG

##</code><code>##

my $DEBUG = 1;