[Perl] Saiten system (partial).