Re^2: remove first and last character of string

[flieckster]

Thanks Rob, but is there a way use this Or remove the last character of $str : substr($str, length($str) - 1, '') to remove the last and first in one line?

[AnomalousMonk]

Win8 Strawberry 5.8.9.5 (32)  Tue 10/13/2020 23:18:23
C:\@Work\Perl\monks
>perl -Mstrict -Mwarnings
my $s = '"654321_1111"';
print "'$s' \n";

$s = substr $s, 1, -1;
print "'$s' \n";
^Z
'"654321_1111"'
'654321_1111'

[syphilis]

$s = substr $s, 1, -1;

Nice.
I didn't know that would work. I would have done it as:

$s = substr $s, 1, length($s) - 2;

But I've read the documentation, now ;-)

Cheers,
Rob