Help for this page
use Sort::Topological; ... [ @_ ]; #my %h = map { $_ => 1 } @_; #\%h }
l c a e i g d o f b h k j n