Adding modified Perl scripts of IUK