Useless use of a constant in void context at ./t.pl line 4.
Useless use of a constant in void context at ./t.pl line 4.
$from = <north>