aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

June 2018 Update

Browse source
This commit is contained in:
Ingy döt Net 2018-06-22 20:57:24 +00:00
parent ba8067c3b7
commit 22f33d4004
5278 changed files with 84726 additions and 14379 deletions
Download patch file Download diff file Expand all files Collapse all files

11
Task/File-modification-time/Julia/file-modification-time.julia
View file

@ -1,11 +1,6 @@
fname = "fool.txt"
tfmt = "%FT%T%z"
println("The modification time of ", fname, " is ")
println(" ", strftime(tfmt, mtime(fname)))
fname, _ = mktemp()
println("The modification time of $fname is ", Dates.unix2datetime(mtime(fname)))
println("\nTouch this file.")
touch(fname)
println("The modification time of ", fname, " is now ")
println(" ", strftime(tfmt, mtime(fname)))
println("The modification time of $fname is now ", Dates.unix2datetime(mtime(fname)))

2
Task/File-modification-time/Perl-6/file-modification-time.pl6
View file

@ -10,7 +10,7 @@ class utimbuf is repr('CStruct') {
}
}
sub sysutime(Str, utimbuf --> int) is native is symbol('utime') {*}
sub sysutime(Str, utimbuf --> int32) is native is symbol('utime') {*}
sub MAIN (Str $file) {
my $mtime = $file.IO.modified // die "Can't stat $file: $!";