in reply to Re: Service controller for Linux/Unix
in thread Service controller for Linux/Unix
my $action = $0 =~ /([^/]+)$/;
You need to escape your forward slash, and in this format, $action is given a true value ('1'), but is not given the result of the match.
The following works and is added to the code:
$0 =~ /([^\/]+)$/; my $action = $1;
Thanks for your comments.
J. J. Horner Linux, Perl, Apache, Stronghold, Unix firstname.lastname@example.org http://www.knoxlug.org/