Hi! I cleaned up your code for you! #18

Open
wants to merge 1 commit into
from
View
14 LICENSE
@@ -17,7 +17,7 @@ You are always permitted to make arrangements wholly outside of this
license directly with the Copyright Holder of a given Package. If the
terms of this license do not permit the full use that you propose to
make of the Package, you should contact the Copyright Holder and seek
-a different licensing arrangement.
+a different licensing arrangement.
Definitions
@@ -50,7 +50,7 @@ Definitions
"Modified Version" means the Package, if it has been changed, and
such changes were not explicitly requested by the Copyright
- Holder.
+ Holder.
"Original License" means this Artistic License as Distributed with
the Standard Version of the Package, in its current version or as
@@ -86,7 +86,7 @@ Package will still be considered the Standard Version, and as such
will be subject to the Original License.
-Distribution of Modified Versions of the Package as Source
+Distribution of Modified Versions of the Package as Source
(4) You may Distribute your Modified Version as Source (either gratis
or for a Distributor Fee, and with or without a Compiled form of the
@@ -108,7 +108,7 @@ you do at least ONE of the following:
(c) allow anyone who receives a copy of the Modified Version to
make the Source form of the Modified Version available to others
under
-
+
(i) the Original License or
(ii) a license that permits the licensee to freely copy,
@@ -120,7 +120,7 @@ you do at least ONE of the following:
Fees are allowed.
-Distribution of Compiled Forms of the Standard Version
+Distribution of Compiled Forms of the Standard Version
or Modified Versions without the Source
(5) You may Distribute Compiled forms of the Standard Version without
@@ -138,7 +138,7 @@ the Source, provided that you comply with Section 4 with respect to
the Source of the Modified Version.
-Aggregating or Linking the Package
+Aggregating or Linking the Package
(7) You may aggregate the Package (either the Standard Version or
Modified Version) with other packages and Distribute the resulting
@@ -155,7 +155,7 @@ include the Package, and Distribute the result without restriction,
provided the result does not expose a direct interface to the Package.
-Items That are Not Considered Part of a Modified Version
+Items That are Not Considered Part of a Modified Version
(9) Works (including, but not limited to, modules and scripts) that
merely extend or make use of the Package, do not, by themselves, cause
View
@@ -101,7 +101,7 @@ print "ABC" =~ /^$ary[$A]$/ ? "ok 25\n" : "not ok 25\n";
print "FOOZ" =~ /^$foo[$A-Z]$/ ? "ok 26\n" : "not ok 26\n";
# MJD 19980425
-($X, @X) = qw(a b c d);
+($X, @X) = qw(a b c d);
print "d" =~ /^$X[-1]$/ ? "ok 27\n" : "not ok 27\n";
print "a1" !~ /^$X[-1]$/ ? "ok 28\n" : "not ok 28\n";
@@ -123,7 +123,7 @@ print $foo;
$ {$CXY} = 23;
if ($ {^XY} != 23) { print "not " }
print "ok 31\n";
-
+
# Does the syntax where we use the literal control character still work?
if (eval "\$ {\cX}" != 17 or $@) { print "not " }
print "ok 32\n";
@@ -139,18 +139,18 @@ print $foo;
print "ok 35\n";
sub XX () { 6 }
- $ {"\cQ\cXX"} = 119;
+ $ {"\cQ\cXX"} = 119;
$^Q = 5; # This should be an unused ^Var.
$N = 5;
# The second caret here should be interpreted as an xor
- if (($^Q^XX) != 3) { print "not " }
+ if (($^Q^XX) != 3) { print "not " }
print "ok 36\n";
-# if (($N ^ XX()) != 3) { print "not " }
+# if (($N ^ XX()) != 3) { print "not " }
# print "ok 32\n";
# These next two tests are trying to make sure that
# $^FOO is always global; it doesn't make sense to `my' it.
- #
+ #
eval 'my $^X;';
print "not " unless index ($@, 'Can\'t use global $^X in "my"') > -1;
@@ -175,7 +175,7 @@ print $foo;
print "not " unless $ {^M} eq 'Someother 3';
print "ok 41\n";
-
+
}
# see if eval '', s///e, and heredocs mix
@@ -227,7 +227,7 @@ EOT
++$test;
# Ditto.
- eval(q{@nosuch = ('a', 'b', 'c'); ">@nosuch<" eq ">a b c<"})
+ eval(q{@nosuch = ('a', 'b', 'c'); ">@nosuch<" eq ">a b c<"})
|| print "# $@", "not ";
print "ok $test\n";
++$test;
View
@@ -177,7 +177,7 @@ print $a <= $b ? "ok 46\n" : "not ok 46\n";
if ($^O eq 'ultrix' || $^O eq 'VMS') {
# Ultrix enters looong nirvana over this. VMS blows up when configured with
# D_FLOAT (but with G_FLOAT or IEEE works fine). The test should probably
- # make the number of 0's a function of NV_DIG, but that's not in Config and
+ # make the number of 0's a function of NV_DIG, but that's not in Config and
# we probably don't want to suck Config into a base test anyway.
print "ok 47\n";
} else {