bug#21647: 24.5; Perl-mode indenting fooled by ...=cut region

[積丹尼 Dan Jacobson]

Perl-mode indents the %Y wrong, if %X is commented.
If %X is uncommented, then both will be indented correctly.

if ( $ARGV[0] eq "TAIWAN" ) {

#    my %X;

=zz
    my %points = (
        A => [ 25.08, 120.61 ],
        B => [ 25.08, 121.40 ],
    );

    use constant TAIWAN_MAP => '
_aBC
_dEF
_GH_
jKL_
MNO_
pQR_
_Tu_
_vW';
=cut

my %Y;
}

In GNU Emacs 24.5.1 (i586-pc-linux-gnu, GTK+ Version 3.16.6)
 of 2015-09-21 on binet, modified by Debian