diff options
Diffstat (limited to 'test/udevd-test/udev-log-script.pl')
-rw-r--r-- | test/udevd-test/udev-log-script.pl | 32 |
1 files changed, 4 insertions, 28 deletions
diff --git a/test/udevd-test/udev-log-script.pl b/test/udevd-test/udev-log-script.pl index 5f4f8a4495..5d7ca71181 100644 --- a/test/udevd-test/udev-log-script.pl +++ b/test/udevd-test/udev-log-script.pl @@ -36,35 +36,11 @@ use strict; # modifiable settings my $log_file = "/tmp/udev_log.txt"; -# global variables -my $devpath; -my $action; -my $subsystem; - -# common functions -sub getDate { - # Get current date/time - # If we want GTM time, simply pass GMT as first argument to this function. - my $format = @_; - my $date; - - if( $format =~ /GMT/i ) { - $date = gmtime() . " GMT"; - } else { - $date = localtime(); - } - return $date; -} - -# main program if ($ARGV[0]) { - # prepare - $subsystem = $ARGV[0]; - $devpath = $ENV{DEVPATH}; - $action = $ENV{ACTION}; - - # Get current system date - my $time = getDate(); + my $subsystem = $ARGV[0]; + my $devpath = $ENV{DEVPATH}; + my $action = $ENV{ACTION}; + my $time = time(); # Logging if (open(LOGF, ">>$log_file")) { |