akrasic · December 18, 2015 09:19
diff --git a/prekillacct.pl b/prekillacct.pl
 #!/usr/bin/perl

 ## Fetch cPanel data

 my %OPTS   = @ARGV;
 my $user   = $OPTS{'user'};
 my $domain = $OPTS{'domain'};
 my $owner  = $OPTS{'owner'};
 my $pass   = $OPTS{'pass'};

 ##
 ## Out custom perl stuff here
 ##

 ## Call the script at the end
 system("/usr/bin/command", "--param", "--param", $user);
	#!/usr/bin/perl

	## Fetch cPanel data

	my %OPTS = @ARGV;
	my $user = $OPTS{'user'};
	my $domain = $OPTS{'domain'};
	my $owner = $OPTS{'owner'};
	my $pass = $OPTS{'pass'};

	##
	## Out custom perl stuff here
	##

	## Call the script at the end
	system("/usr/bin/command", "--param", "--param", $user);