Hilfe bei einem regulären Ausdruck

[Andypsilon]

Hallo Community,
da ich in Sachen Perl nicht so den Durchblick habe, bitte ich bei einem reg. Ausdruck um Eure Hilfe:
Ich sitze vor dem u.a. Ausdruck und steige einfach nicht zu 100% dahinter, was der Verfasser damit ausdrücken will:

$variable =~ /^([\w\W^-]*)-Wort$/

Ferner fragt der Autor ab, ob der o.a. Ausdruck wahr ist (Verwendung in einer IF-Clause).

Ich hoffe, ihr versteht ihn etwas besser als ich!

Danke im Voraus,
Andreas