Bug#884286: use Switch breaks <DATA>

[Christoph Berg]

Package: libswitch-perl
Version: 2.17-2
Severity: normal

Merely adding "use Switch;" to a perl program breaks the use of
__DATA__ sections via <DATA>:

$ cat switch.pl
use Switch;
print <DATA>;
__DATA__
foobar

$ perl switch.pl

$ cat switch.pl
#use Switch;
print <DATA>;
__DATA__
foobar

$ perl switch.pl
foobar

This is not documented under LIMITATIONS in Switch(3pm).

Christoph