It is probably best to use a regex pattern for this
use v5.10;
my $s=".a_b_c(x_y_z)";
my ($ss) = $s =~ /(\w+)/;
say $ss;
output
a_b_c
0
solved How to print part of string which is of kind mentioned below [closed]
It is probably best to use a regex pattern for this
use v5.10;
my $s=".a_b_c(x_y_z)";
my ($ss) = $s =~ /(\w+)/;
say $ss;
a_b_c
0
solved How to print part of string which is of kind mentioned below [closed]