Perl framework initial check-in