Help for this page
use strict; use warnings; ... $str =~ s/^"|"$//g; print "'$str'\n";
'654321_1111'