1、我想要键入的字符串可以向右对齐20个字符宽输出，以下是脚本：

#!usr/bin/perl -w
use strict;
print "1234567890" x 4," \n";
my @c=<STDIN>;
chomp @c;
printf "%20s\n", '@c';

但是为什么键入的字符串并没有执行，而是单纯的输出，请问哪里错了呢？
AppledeMacBook-Air-5:test apple$ perl 115-2-1.pl
1234567890123456789012345678901234567890
hello^D

如果我使用了ctrl+D键，则直接向右对齐20个字符宽，但是我压根没键入字符串呢？请大神指导！
AppledeMacBook-Air-5:test apple$ perl 115-2-1.pl
1234567890123456789012345678901234567890
          @c