Select Code to Download

my $check = 'a';
$check++ for 1 .. 5;

my $check = 'cd';
substr $check, 0, 1, q();

my $check = 'sp';
$check =~ s/^.//;