summaryrefslogtreecommitdiff
path: root/util/echo.pl
blob: 8c2616a3bcb05a30ee5c4d9feb2cddf63ee194cb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
#! /usr/bin/env 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;