in reply to Re^2: Dereferencing in blessed object
in thread Dereferencing in blessed object

Use braces:

$db =~ s/_.+?_/_${dbname}_/;

🦛

Replies are listed 'Best First'.
Re^4: Dereferencing in blessed object
by choroba (Cardinal) on Feb 28, 2021 at 22:14 UTC
    Or, use a backslash, because TIMTOWTDI:
    $db =~ s/_.+?_/_$dbname\_/;
    map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
Re^4: Dereferencing in blessed object
by Bod (Parson) on Feb 27, 2021 at 22:51 UTC
    Use braces:

    That was my first thought - but I tried it and it didn't work...
    So...plenty of use of Ctrl+Z and I realised what I did wrong!

    $db =~ s/_.+?_/_{$dbname}_/;

    Not quite the same!
    Thanks hippo

      but I tried it and it didn't work

      Sure it does:

      use strict; use warnings; use Test::More tests => 1; my $db = 'a_foo_b'; my $dbname = 'bar'; $db =~ s/_.+?_/_${dbname}_/; is $db, 'a_bar_b';

      Update: I see from your reply that you had already figured that out. Apologies!


      🦛

        It didn't work for me...because of my typo when I tested it...
        I put the $ inside the braces :(