看板
[ Perl ]
討論串[問題] 關於長字串文字排版
共 5 篇文章
內容預覽:
#!/usr/bin/perl. use warnings;. use strict;. use List::Util qw(max);. my @array1 = (10000, 233, 899983, 4908);. my @array2 = ( 10, 32323, 73, 343238);
(還有410個字)
內容預覽:
chomp(@TMP=<DATA>);. foreach(@TMP) {. foreach( map { length } split(/ /) ) {. $i++;. $LEN{$i}=$_ if($LEN{$i} < $_);. } undef $i;. }. foreach(@TMP) {.
(還有276個字)
內容預覽:
你試試看這段程式, 是不是符合你想要的功能?. @a = (1,2,345);. @b = (12,34,5678);. @c = (123,45,6);. format A =. @<<<<<< @|||||| @>>>>>>. $a $b $c. .. $~ = 'A';. for(0..3)
(還有53個字)
內容預覽:
這問題的很簡單 也很簡短 但為了詳細敘述所以寫比較長. 希望各位高手不要看到一大篇就左轉 謝謝各位高手. 我有個文字檔 經過perl擷取部分資料 寫進陣列之後. 用迴圈重新print陣列中資料. 但文字部分 有長有短且差異很大 希望print之後很整齊. 例如. for($ = 0; $i <= 1
(還有463個字)