$string = "hello world";
print $string =~ /^.{!$!}(.{5})/;