| Current Path : /proc/self/root/proc/thread-self/root/proc/self/root/usr/share/doc/perl-CGI-Compile/t/ |
| Current File : //proc/self/root/proc/thread-self/root/proc/self/root/usr/share/doc/perl-CGI-Compile/t/switch.cgi |
#!/usr/bin/perl
use strict;
use warnings;
use Switch;
switch (42) {
case 42 { print "switch works\n" }
}