c:>perl -MSmart::Comments
$var = 123;
### $var
$x = 'fred';
### $x
^Z
### $var: 123
### $x: 'fred'