Last active
August 27, 2015 14:00
-
-
Save backroot/8b4eca6e64b9cbaf0a6d to your computer and use it in GitHub Desktop.
ファイルの書き込み
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
sub writeFile{ | |
my( $path, $data, $mode) = @_; | |
$mode ? open( FH, ">>".$path) : open( FH, ">".$path); | |
binmode( FH); | |
print FH $data; | |
close( FH); | |
} |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment