in reply to Finding Eulerian Path

my $u = ( @{ $graph{$v} } )[0];

$u = $graph{v}[0] is valid perl code, by the way ;-).

In Section Seekers of Perl Wisdom