Perl + Strings

[Boris Höffgen <borish@hjdt.de>]

Hallo,

wie kann ich test.de und bob aus dem String mittels Perl filtern?

String:
my $s = '/home/mail/test.de/bob/spam/test.txt';
my($domain, $user) = $s =~?????

Gruß
Boris