Perl CBT programs