Perlでファイル書き出し

自己紹介

ファイル書き出し遍歴@Perl

open関数を使う(1) - その1

		 1 use strict;
		 2 
		 3 open( FH, '>file1.txt' ) or die;
		 4 print FH 'foo';
		 5 close FH;
	

open関数を使う(1) - その2

		 1 use strict;
		 2 
		 3 open( FH, '>', 'file2.txt' ) or die;
		 4 print FH 'bar';
		 5 close FH;
	

IO::Fileを使う - その1

		 1 use strict;
		 2 use IO::File;
		 3 
		 4 my $io = IO::File->new( 'file3.txt', 'w' ) or die;
		 5 print $io 'hoge';
		 6 close $io;
	

IO::Fileを使う - その2

		 1 use strict;
		 2 use IO::File;
		 3 
		 4 my $io = IO::File->new( 'file4.txt', 'w' ) or die;
		 5 $io->print( 'fuga' );
		 6 $io->close;
	

open関数を使う(2)

		 1 use strict;
		 2 
		 3 open( my $fh, '>', 'file5.txt' ) or die;
		 4 print $fh 'piyo';
		 5 close $fh;
	

まとめ

宣伝

絶賛発売中!

WEB+DB PRESS vol.69

ご静聴、ありがとうございました

/

#