perl mrg.pl