[Skeleton Man]

Originally Posted by Arowana

Consider the following substitution:

s/([A-Z][a-z]+) ([A-Z][a-z]+)/$2 $1/;

Suppose $_ eq "Tom Hanks" before the above substitution is applied. What is stored in $_ afterwards?

Try it for yourself and see, put the following into a script and run it:

Code:

#!/usr/bin/perl

$_ = "Tom Hanks";
s/([A-Z][a-z]+) ([A-Z][a-z]+)/$2 $1/;

print "$_\n";