Fix trailing whitespace in scripts and misc. files

Tools/Scripts/webkitperl/VCSUtils_unittest/parseDiffWithMockFiles.pl

 #!/usr/bin/perl -w
 #
 # Copyright (C) 2011 Research In Motion Limited. All rights reserved.
 # Copyright (C) 2013 Apple Inc. All rights reserved.
 #
 # This library is free software; you can redistribute it and/or
 # modify it under the terms of the GNU Lesser General Public
 # License as published by the Free Software Foundation; either
 # version 2.1 of the License, or (at your option) any later version.
-# 
+#
 # This library is distributed in the hope that it will be useful,
 # but WITHOUT ANY WARRANTY; without even the implied warranty of
 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 # Lesser General Public License for more details.
-# 
+#
 # You should have received a copy of the GNU Lesser General Public
 # License along with this library; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 
 # Unit tests of parseDiff() with mock files; test override of patch EOL with EOL of target file.
 
 use strict;
 use warnings;
 
 use File::Temp;
@@ skipping 74 matching lines @@
 Index: Makefile
 ===================================================================
 --- Makefile    (revision 53052)
 +++ Makefile    (working copy)
 @@ -1,3 +1,4 @@
 EOF
 
 my $diffBody = <<EOF;
 +
  MODULES = JavaScriptCore JavaScriptGlue WebCore WebKit WebKitTools
- 
+
  all:
 EOF
 
 my $MakefileContents = <<EOF;
-MODULES = JavaScriptCore JavaScriptGlue WebCore WebKit WebKitTools 
+MODULES = JavaScriptCore JavaScriptGlue WebCore WebKit WebKitTools
 
 all:
 EOF
 
 my $mockDir = File::Temp->tempdir("parseDiffXXXX", CLEANUP => 1);
 writeToFile(File::Spec->catfile($mockDir, "MakefileWithUnixEOL"), $MakefileContents);
 writeToFile(File::Spec->catfile($mockDir, "MakefileWithWindowsEOL"), toWindowsLineEndings($MakefileContents));
 writeToFile(File::Spec->catfile($mockDir, "MakefileWithMacEOL"), toMacLineEndings($MakefileContents));
 
 # The array of test cases.
@@ skipping 351 matching lines @@
     return $string;
 }
 
 sub writeToFile
 {
     my ($file, $text) = @_;
     open(FILE, ">$file") or die;
     print FILE $text;
     close(FILE);
 }