String Perl

#!usr/bin/perl
use warnings;
use strict;
my $string = "Happy Birthday";
printf "\t%.11s\n", $string;