[8]修改上一个程序,允许用户选择宽度,如,用户输入 30,hello, good-bye(在不同的行中),则每一行的宽度为 30。(提示:参阅第二章相应部分)。提示,如果选择的宽度太长,可以增加比较行的长度。
答案:#!/usr/bin/perl
use strict;
my @array =
[8]修改上一个程序,允许用户选择宽度,如,用户输入 30,hello, good-bye(在不同的行中),则每一行的宽度为 30。(提示:参阅第二章相应部分)。提示,如果选择的宽度太长,可以增加比较行的长度。
答案:#!/usr/bin/perl
use strict;
my @array =