mirror of
				https://github.com/MariaDB/server.git
				synced 2025-11-03 14:33:32 +03:00 
			
		
		
		
	- dynamic configuration support - safe process - cleanups - create new suite for fedarated
		
			
				
	
	
		
			22 lines
		
	
	
		
			267 B
		
	
	
	
		
			Perl
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			22 lines
		
	
	
		
			267 B
		
	
	
	
		
			Perl
		
	
	
		
			Executable File
		
	
	
	
	
#!/usr/bin/perl
 | 
						|
# -*- cperl -*-
 | 
						|
 | 
						|
use strict;
 | 
						|
use Getopt::Long;
 | 
						|
 | 
						|
my $opt_exit_code= 0;
 | 
						|
 | 
						|
GetOptions
 | 
						|
  (
 | 
						|
   # Exit with the specified exit code
 | 
						|
   'exit-code=i'   => \$opt_exit_code
 | 
						|
  );
 | 
						|
 | 
						|
 | 
						|
print "Hello stdout\n";
 | 
						|
print STDERR "Hello stderr\n";
 | 
						|
 | 
						|
exit ($opt_exit_code);
 | 
						|
 | 
						|
 |