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

Question

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

Answer 1

my $foo = " \t\n\r  hello, world!";
$foo =~ s/^\s+//;    # This is the line that removes the leading whitespace.
print "$foo\n";
print ord($foo) . "\n";

Будет отображаться:

hello, world!
104

104 - код символа ASCII для h, доказывающий, что строка не имеет начальных пробелов.

Answer 2

Это ищет повторяющиеся пробелы (\s+) в начале строки (^), заменяя их ничем (т.е. что находится между разделителями здесь: //):

$myString =~ s/^\s+//;

Answer 3

$temp = "   Hello world";
#print $temp;
$temp =~ s/^\s+//;
print $temp;