use Devel::Peek;
my $x = "abc";
Dump $x; # here $x is not magic
$x =~ /./g;
Dump $x; # now it is