use strict;
use warnings;
{
no warnings;
<<'COMMENT';
$foo = 'bar';
COMMENT
}