# Code:
    our $dog;
    my $pet     = 'dog';
    ${ $pet }   = 'Rover';              # no strict 'refs'
    print "$dog\n";

# Output:
Can't use string ("dog") as a SCALAR ref while "strict refs" in use at strict-demo.pl line 18.