D:\tmp>perl
use strict;
use warnings;
eval <<'__CODE__';
    use Data::Dumper;
    $Data::Dumper::Indent = 0;
__CODE__
__END__

D:\tmp>