use Data::Dumper;

sub show {
    my ($s) = @_ ;
    local $Data::Dumper::Indent = 0;
    local $Data::Dumper::Terse = 1;
    local $Data::Dumper::Useqq = 1;
    return Dumper($s);
}