2015-04-23から1日間の記事一覧

perl メモ(ファイル)

#!/usr/bin/perl use strict; use warnings; use 5.010; { open TXT, '>', 'out.txt'; say TXT "Hello, world1"; say TXT "Hello, world2"; close TXT; open my $fh, '<', 'out.txt' or die "Could not open out.txt: $!"; while (<$fh>) { print; # Hello, …