diff --git a/src/basic-languages/perl/perl.contribution.ts b/src/basic-languages/perl/perl.contribution.ts
index f0ac9ce2..2d1ace18 100644
--- a/src/basic-languages/perl/perl.contribution.ts
+++ b/src/basic-languages/perl/perl.contribution.ts
@@ -10,7 +10,7 @@ declare var require: any;
 
 registerLanguage({
 	id: 'perl',
-	extensions: ['.pl'],
+	extensions: ['.pl', '.pm'],
 	aliases: ['Perl', 'pl'],
 	loader: () => {
 		if (AMD) {