Code:


#!/usr/bin/perl
use strict;
use ExtUtils::MakeMaker qw/prompt/;

my $name = prompt("Hi, What is your name?");

print "Hello \L\u$name\E, Welcome to Ubuntu!\n";