This tests verbatim blocks:
# Sample Perl code: my $scalar=4; my $sref = \$scalar;
Then same code in a real verbatim block: