Регулярное выражение для удаления ведущей части строки

Question

У меня есть разные строки, но они отформатированы одинаково с тремя словами, разделенными пробелами. Цель состоит в том, чтобы удалить первую часть строки. Другими словами, удалите начальные данные для каждой строки.

Какое регулярное выражение Perl позволит мне удалить начальные данные, не затрагивая остальную часть строки?

ВХОД

String 1: Apples Peaches Grapes
String 2: Spinach Tomatoes Carrots
String 3: Corn Potatoes Rice

OUTPUT

String 1: Peaches Grapes
String 2: Tomatoes Carrots
String 3: Potatoes Rice

Perl

#! /usr/bin/perl

use v5.10.0;
use warnings;

$string1 = "Apples Peaches Grapes";
$string2 = "Spinach Tomatoes Carrots";
$string3 = "Corn Potatoes Rice";

# Apply ReqExp to Delete the First Part of the String
$string1 =~ s/.../; 

say $string1;
say $string2;
say $string3;

Answer 1

$string1 =~ s/^\S+\h+//; 

• ^ начало строки
• \S+ 1 или более непробельных символов
• \h+ 1 или более горизонтальных пробелов

Если вы используете версию Perl старше v5.10, вы можете использовать:

$string1 =~ s/^\S+[ \t]+//;