Select Code to Download

use strict; 

my $string = 'hello world'; 
print substr($string,'O',5)."\n";

perl absurd.pl
hello

use strict; 
use warnings;

my $string = 'hello world'; 
print substr($string,'O',5)."\n";

perl absurd.pl
Argument "O" isn't numeric in substr at absurd.pl line 4.
hello