Skip to main content
Post Undeleted by comperendinous
Corrected bug in original, and added improved answer
Source Link

Perl, 5643 56

print substr'Mine was not Red 5!',4*$i++,4;

I accept that I can't win this one. My programoriginal attempt explains why:

@a=('This ''This','code ','is 'code','too' is',' too','long' long.');print$a[$i++];

Perl, 56

I accept that I can't win this one. My program explains why:

@a=('This ','code ','is ','too ','long.');print$a[$i++];

Perl, 43 56

print substr'Mine was not Red 5!',4*$i++,4;

I accept that I can't win this one. My original attempt explains why:

@a=('This',' code',' is',' too',' long.');print$a[$i++];
Post Deleted by comperendinous
Source Link

Perl, 56

I accept that I can't win this one. My program explains why:

@a=('This ','code ','is ','too ','long.');print$a[$i++];