#!/usr/bin/env perl use strict; use warnings; my input = ; chomp $input; print $input;