#! /usr/bin/env perl

BEGIN {
        my $default_cmd = "search";
        unshift @ARGV, $default_cmd unless $ARGV[0] =~ /search|help|commands/;
}

use App::DPath -run;

