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