Select Code to Download

 

package App::Backend;
...
# ... the rest of the module...
1;

 
 sub type { 

...
   return 'SQL'; 
}

 
 sub type { 

...
   return 'PlainText'; 
}

#!/usr/bin/perl 
use Test::More qw(no_plan); 
...

}