[Ifeffit] Using Ifeffit in Perl