Con le RE (regular expressions)
E` un linguaggio a se` che si trova disponibile in molti linguaggi, con sintassi molto simile.
Per maggiori info, puoi vedere i manuali del Perl (fatti molto bene, anche per le RE).
Nel tuo caso (ad esempio):
codice:
my $vettore="ciao, telaio, mela!!! (topsecret), ancora una(";
my @miaparola = split(" ",@vettore);
my $out = @miaparola[3];
$out =~ s/[\(\)]//; # esse slash apertaquadra backslash apertatonda backslash chiusatonda chiusaquadra slash slash
Ma per estrarre una stringa compresa tra le parentesi, puoi anche fare:
codice:
my $vettore="ciao, telaio, mela!!! (topsecret), ancora una(";
$vettore =~ /\((.+?)\)/; # slash backslash apertatonda apertatonda punto piu` puntointerr chiusatonda backslash chiusatonda slash
my $out = $1;