Commit f9035b1e authored by Tobias Hunger's avatar Tobias Hunger
Browse files

Add script to convert krazy output into a tasks file

parent 7cc6b469
#!/usr/bin/perl -w
use strict;
my $file = shift;
die "No .tasks file given to save data into." unless ($file);
open(PIPE, "krazy2all . --export textedit |") or
die "Could not start krazy2all, please make sure it is in your PATH.";
open(FILE, ">$file") or die "Failed to open \"$file\" for writing.";
while (<PIPE>) {
my $line = $_;
chomp $line;
next unless $line =~ /^(.*):(\d+):(.*)$/;
my $file = $1;
my $lineno = $2;
my $description = $3;
next if $file =~ /\/3rdparty\//;
print FILE "$file\t$lineno\tWARN\tKrazy: $description\n";
}
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment