Select Code to Download

say for grep { /DBIC/ .. /Dancer/ and !/DBIC/ and !/Dancer/ } qw<eval 
+DBIC::3 eval DBIC::2 DBIC::1 MyApp::3 MyApp::2 MyApp::1 Dancer::3 Dan
+cer::2 Dancer::1>;

say for grep { /DBIC/ .. /Dancer/ and !/DBIC/ and !/Dancer/ } qw<MyApp
+::3 MyApp::2 MyApp::1 Dancer::3 Dancer::2 Dancer::1>;