構文 |
|
printf ファイル・ハンドル 書式, データ printf 書式, データ |
返り値 |
|
出力成功時に真 |
説明
- 文字列を指定した書式でフォーマットしてファイル・ハンドルに出力します。
- ファイル・ハンドルを省略するとselectされている出力ファイル・ハンドル(通常は標準出力)に出力します。
- 書式中に記述するフィールド指定子は%m.nxです。mとnは数字でどちらも省略可能です。xは代表的なものとして,(表)の文字があります。
表b 2進整数 c 文字 d 10進整数 e 浮動小数点(指数形式) f 浮動小数点(固定小数点形式) g 浮動小数点(コンパクト形式) o 8進整数 s 文字列 x 16進整数(小文字) X 16進整数(大文字)
使用例
#!/usr/bin/perl
use strict;
use warnings;
foreach my $i (1..20) {
printf "%2d\n", $i;
}
#!/usr/bin/perl
use strict;
use warnings;
foreach my $i (1..20) {
printf "%02d\n", $i;
}
#!/usr/bin/perl
use strict;
use warnings;
my $pi = 3.14;
printf "%e\n", $pi;
printf "%f\n", $pi;
printf "%g\n", $pi;
#!/usr/bin/perl
use strict;
use warnings;
foreach my $i (0..20) {
printf "%5b %2o %2d %2x\n", $i, $i, $i, $i;
}
#!/usr/bin/perl
use strict;
use warnings;
my @items = qw(
Perl
PHP
Python
Ruby
);
foreach my $item (@items) {
printf "Enjoy %s!\n", $item;
}
#!/usr/bin/perl
use strict;
use warnings;
my @items = qw(
Perl
PHP
Python
Ruby
);
my $filename = 'test.txt';
open my $fh, ">", $filename or die "$!:$filename";
foreach my $item (@items) {
printf $fh "Enjoy %s!\n", $item;
}
close $fh;
#!/usr/bin/perl
use strict;
use warnings;
while (my $line = <>) {
printf "%4d: %s", $., $line;
}