Imported OpenSSL 1.1.1a
This commit is contained in:
12
util/echo.pl
Normal file
12
util/echo.pl
Normal file
@@ -0,0 +1,12 @@
|
||||
#! /usr/bin/perl
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
use Getopt::Std;
|
||||
|
||||
our $opt_n = 0;
|
||||
|
||||
getopts('n') or die "Invalid option: $!\n";
|
||||
|
||||
print join(' ', @ARGV);
|
||||
print "\n" unless $opt_n;
|
||||
Reference in New Issue
Block a user