ea8dc4b6d2251b437950c0056bc626b311c73c27eschrock printf("perl => substr(\"foobarbazbop\", 3) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 3) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 300) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 300) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -10) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -10) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 0) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 0) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 1) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 1) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 11) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 11) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 12) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 12) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 13) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 13) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 8, 20) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 8, 20) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 4, 4) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 4, 4) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 5, 8) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 5, 8) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 5, 9) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 5, 9) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 400, 20) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 400, 20) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 400, 0) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 400, 0) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 400, -1) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 400, -1) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 3, 0) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 3, 0) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 3, -1) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 3, -1) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 3, -4) = \"%s\"\n",
8053a26377fa80614ba5221e12b86aab4e8a675eck printf(" D => substr(\"foobarbazbop\", 3, -4) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 3, -20) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 3, -20) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -10, -5) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -10, -5) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens if (substr("foobarbazbop", 0, 400) ne "foobarbazbop") {
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", 0, 400) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", 0, 400) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -1, 400) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -1, 400) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -1, 0) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -1, 0) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -1, -1) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -1, -1) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens if (substr("foobarbazbop", -24, 24) ne "foobarbazbop") {
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -24, 24) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -24, 24) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -24, 12) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -24, 12) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -24, 13) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -24, 13) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens if (substr("foobarbazbop", -12, 12) ne "foobarbazbop") {
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -12, 12) = \"%s\"\n",
503ad85c168c7992ccc310af845a581cff3c72b5Matthew Ahrens printf(" D => substr(\"foobarbazbop\", -12, 12) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens if (substr("foobarbazbop", -12, 11) ne "foobarbazbo") {
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"foobarbazbop\", -12, 11) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"foobarbazbop\", -12, 11) = \"%s\"\n",
503ad85c168c7992ccc310af845a581cff3c72b5Matthew Ahrens if (substr("CRAIG: Positioned them, I don't know... I'm fairly wide guy.", 100, 10) ne "") {
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"CRAIG: Positioned them, I don't know... I'm fairly wide guy.\", 100, 10) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens substr("CRAIG: Positioned them, I don't know... I'm fairly wide guy.", 100, 10));
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"CRAIG: Positioned them, I don't know... I'm fairly wide guy.\", 100, 10) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens if (substr("CRAIG: Positioned them, I don't know... I'm fairly wide guy.", 100) ne "") {
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf("perl => substr(\"CRAIG: Positioned them, I don't know... I'm fairly wide guy.\", 100) = \"%s\"\n",
fa9e4066f08beec538e775443c5be79dd423fcabahrens substr("CRAIG: Positioned them, I don't know... I'm fairly wide guy.", 100));
fa9e4066f08beec538e775443c5be79dd423fcabahrens printf(" D => substr(\"CRAIG: Positioned them, I don't know... I'm fairly wide guy.\", 100) = \"%s\"\n",