use strict;
use warnings;

use if 1, "Data::Dumper";

my $var = "Hallo";
print Dumper \$var;