diff options
| author | Paul C. Bütow <rantanplan@users.noreply.github.com> | 2014-04-10 06:51:56 +0200 |
|---|---|---|
| committer | Paul C. Bütow <rantanplan@users.noreply.github.com> | 2014-04-10 06:51:56 +0200 |
| commit | 70cf2c546a377a9b21167fb1bb9faeabc568bde6 (patch) | |
| tree | 1068cb51a278d2e27c62569d8bdcc1a6949d5e7f | |
| parent | fd213f4801f2f6f729ff5824511f64dd4ebab6bf (diff) | |
cleanup
| -rwxr-xr-x | loadbars | 20 |
1 files changed, 0 insertions, 20 deletions
@@ -69,26 +69,6 @@ else { exit Loadbars::Constants->E_NOHOST; } -# Expand a host 'hostname[08..10,13].example.com' to -# hostname08.example.com -# hostname09.example.com -# hostname10.example.com -# hostname13.example.com - -=cut -my @expanded_hosts; - -for my $host (@hosts) { - my @expands = $host =~ /\[(.+\)\].*/g; - - k - - } else { - push @expanded_hosts, $host; - } -} -=cut - my @threads = Loadbars::Main::threads_create @hosts; Loadbars::Main::loop $dispatch, @threads; |
