Select Code to Download

#! /usr/bin/perl
use strict;
...
Hello

World

$input=Hello    $1=Hello
$input= $1=Hello
$input=World    $1=World