replace camelcase variable name

diff --git a/lib/System/Introspector/Gatherer.pm b/lib/System/Introspector/Gatherer.pm
index 92ef512..f9359ea 100644 (file)
--- a/lib/System/Introspector/Gatherer.pm
+++ b/lib/System/Introspector/Gatherer.pm
@@ -28,12 +28,12 @@ sub gather_all {
         my ($base, $args) = @$spec;
         my $module = "System::Introspector::Probe::$base";
         log_debug { "Using '$module' for this gather" };
-        my $moduleName = use_module($module);
-        log_trace { "Finished loading '$module'; returned value was '$moduleName'" };
-        my $instance = $moduleName->new($args); 
-        log_trace { "Finished constructing '$moduleName'" };
+        my $module_name = use_module($module);
+        log_trace { "Finished loading '$module'; returned value was '$module_name'" };
+        my $instance = $module_name->new($args); 
+        log_trace { "Finished constructing '$module_name'" };
         $report{$base} = $instance->gather; 
-        log_trace { "Finished invocation of '$moduleName->gather()'" };  
+        log_trace { "Finished invocation of '$module_name->gather()'" };  
     }
     
     log_trace { "gather_all() has completed" };