Perl and other programs for SET