diff options
| author | Peter Palfrader <peter@palfrader.org> | 2003-02-28 17:10:57 +0000 |
|---|---|---|
| committer | Peter Palfrader <peter@palfrader.org> | 2003-02-28 17:10:57 +0000 |
| commit | 1f8f0f17e48297aceb1fb5255139b9be8cc7b62d (patch) | |
| tree | 51f3bf3ad29782e23cdcfbe7de150348b0291660 /Echolot/Tools.pm | |
| parent | 3b571844ce4dca49fafae822eaddab7f741f221f (diff) | |
minor whitespace change
Diffstat (limited to 'Echolot/Tools.pm')
| -rw-r--r-- | Echolot/Tools.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Echolot/Tools.pm b/Echolot/Tools.pm index 4531dba..4426b86 100644 --- a/Echolot/Tools.pm +++ b/Echolot/Tools.pm @@ -1,7 +1,7 @@ package Echolot::Tools; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Tools.pm,v 1.20 2003/02/18 06:57:07 weasel Exp $ +# $Id: Tools.pm,v 1.21 2003/02/28 17:10:57 weasel Exp $ # =pod @@ -339,13 +339,13 @@ sub make_garbage() { }; close (FH) or Echolot::Log::warn("Cannot close $file: $!."); - + $random = unpack("H*", $random); $random = join "\n", grep { $_ ne '' } (split /(.{64})/, $random); - $random = "----- BEGIN GARBAGE -----\n". + $random = "-----BEGIN GARBAGE-----\n". $random."\n". - "----- END GARBAGE -----\n"; - + "-----END GARBAGE-----\n"; + return $random; }; |