Big update of Clearadm

[clearscm.git] / clearadm / test.pl

diff --git a/clearadm/test.pl b/clearadm/test.pl
index 8e89bbb..3447284 100755 (executable)
--- a/clearadm/test.pl
+++ b/clearadm/test.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 
@@ -237,4 +237,4 @@ my ($err, $msg) = $clearadm->DeleteSystem ($system{name});
 
 error $msg, $err
   if $err;
-   
\ No newline at end of file
+