Perl- A * Krossgryn,