Help language development. Donate to The Perl Foundation
Get all versions of a file in a git repository. Main use case for this is when you use the repository for storage, and want to examine the progression of some files. Or whatever. I don't really know, it was an itch I had to scratch and here we are.
Usual way:
zef install Git::File::History
use Git::File::History; my $file-histories = Git::File::History.new(); # Will throw if not in a repo say $file-histories.history-of( "README.md"); # .date contains a DateTime object, .state the contents of the file for $file-histories.history-of( "t/01-basic.t") -> $fv { say $fv.date, " → ", $fv.state.split("\n").elems; } # Repo in another directory: my $file-histories' = Git::File::History.new( "another/dir" ); # Limit to a few files (for big repos) my $yet-another = Git::File::History.new( :files("t/*.t") );
Other git-related stuff in Raku land
(c) JJ Merelo, [email protected]
This module will be licensed under the Artistic 2.0 License (the same as Raku itself).