diff options
| author | Jacob Pipkin <j@dawnrazor.net> | 2012-09-01 12:06:19 -0500 |
|---|---|---|
| committer | Jacob Pipkin <j@dawnrazor.net> | 2012-09-01 12:06:19 -0500 |
| commit | eb394521aabc27b9918c84a2fc6eb7571f577510 (patch) | |
| tree | 052c0697ea23fe25180fe1b390e003c85cbff199 /sbofind | |
| parent | b182d3c89554828478d8d24fd31a87ba629e75fc (diff) | |
| download | sbotools2-eb394521aabc27b9918c84a2fc6eb7571f577510.tar.xz | |
almost there.
Diffstat (limited to 'sbofind')
| -rwxr-xr-x | sbofind | 8 |
1 files changed, 5 insertions, 3 deletions
@@ -77,12 +77,14 @@ sub get_file_contents ($) { -f $_[0] or return "$_[0] doesn't exist.\n"; my $fh = open_read shift; my $contents = do {local $/; <$fh>}; - $contents =~ s/\n/\n /g; - $contents =~ s/ $//g; + for ($contents) { + s/\n/\n /g; + s/ $//g; + } return $contents; } -perform_search $search; +my $findings = perform_search $search; # pretty formatting if (exists $$findings[0]) { |
