my $input = "xxxx aaaa bbbbb";
my ($txt) = $input =~ /\s{5}(.+)(?{length($input);})/;
print $txt, "\n";
__END__
Use of uninitialized value $txt in print at ?? line ??.