Linear Sqitch plan generator
1234567891011121314151617
# Input: chronological list of migration names.
# Output: Sqitch plan file for use with Sqitch.
use v5.20;
use warnings;
say('%syntax-version=1.0.0');
say('%project=irrelevant');
say('');
my $previous = '';
while (<STDIN>) {
chomp;
say("$_$previous 1970-01-01T00:00:00Z irrelevant <irrelevant>");
$previous = " [$_]";
}
Perl
INFO