xref: /netbsd-src/crypto/external/bsd/openssl/dist/util/echo.pl (revision b0d1725196a7921d003d2c66a14f186abda4176b)
1#! /usr/bin/env perl
2
3use strict;
4use warnings;
5use Getopt::Std;
6
7our $opt_n = 0;
8
9getopts('n') or die "Invalid option: $!\n";
10
11print join(' ', @ARGV);
12print "\n" unless $opt_n;
13