perlを強化