Select Code to Download

#!/usr/bin/perl
use warnings;
...

die 'Full key' unless trie_exists(\%trie, 'pizza');
die 'Non prefix' if trie_exists(\%trie, 'andwich');