#!/usr/local/bin/perl

use strict;
use warnings;

my $str = "72 101 108 108 111";
my @array = split / /,$str;
@array = map (chr, @array);
$str = join "",@array;
print "$str\n";