Help for this page
$ cat <<EOF > test.in one o n e ... TWO t w o THREE t h r e e
$ cat <<EOF > upcase-firstword #!/usr/bin/perl -p ... $ diff test.out test2.out