use 5.24.0; my $string = "Hello World!\n"; say $string ; say substr $string, index ($string, "o")+1, 5 ;