plocka ut delar ur en sträng

Finns det nåt kommando som man enkelt kan plocka ut delar ur en sträng med?
Ur en rad i en apache-logfil:
127.0.0.1 - - [16/Apr/2002:21:10:03 +0200] "GET /test...blabla

så vill jag plocka ut och använda all text ända fram till slutklammern "]".
I skalet kan man ju använda 'awk', men finns det nåt likvärdigt kommando i Perl?

Hälsn,
ReKa1

Om $string='127.0.0.1 - - [16/Apr/2002:21:10:03 +0200] "GET /test...blabla ';

Kan du använda;

($string)=$string =~ /^(.*?\])/;

så har du det nya värdet i $string.

($string)=$string =~ /^(.*?\])/;

Vaför har du så och inte, $string =~ ...?
Undrar bara...

= definierar en tilldelning, =~ ett regexp.