Editing Polyglot (computing) (section)

===DOS batch file and Perl===

The following file runs as a [[DOS]] batch file, then re-runs itself in [[Perl]]:

{{columns-start}}
'''Highlighted for DOS batch'''
<syntaxhighlight lang="dosbatch">
 @rem = ' --PERL--
 @echo off
 perl "%~dpnx0" %*
 goto endofperl
 @rem ';
 #!perl
 print "Hello, world!\n";
 __END__
 :endofperl
</syntaxhighlight>
{{column}}
'''Highlighted for Perl'''
<syntaxhighlight lang="perl">
 @rem = ' --PERL--
 @echo off
 perl "%~dpnx0" %*
 goto endofperl
 @rem ';
 #!perl
 print "Hello, world!\n";
 __END__
 :endofperl
</syntaxhighlight>
{{columns-end}}

This allows creating Perl scripts that can be run on DOS systems with minimal effort. Note that there is no requirement for a file to perform exactly the same function in the different interpreters.