mirror of
https://github.com/shlomif/PySolFC.git
synced 2025-04-05 00:02:29 -04:00
Add a utility script.
This commit is contained in:
parent
f8d37be1e9
commit
7917931417
1 changed files with 25 additions and 0 deletions
25
scripts/filter-inidivual-importing-tests.pl
Normal file
25
scripts/filter-inidivual-importing-tests.pl
Normal file
|
@ -0,0 +1,25 @@
|
|||
#!/usr/bin/perl
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
use IO::All;
|
||||
use List::MoreUtils qw(none);
|
||||
|
||||
my @m2;
|
||||
L_LOOP:
|
||||
foreach my $l (io("scripts/gen_individual_importing_tests.py")->getlines())
|
||||
{
|
||||
if ($l =~ m/^for module_name/)
|
||||
{
|
||||
my @ms = $l =~ m{('pysollib\.[^']+')}g;
|
||||
@m2 = (map { $_ =~ s/\A'//r =~ s/\'\z//r =~ tr#.#/#r } @ms);
|
||||
last L_LOOP;
|
||||
}
|
||||
}
|
||||
|
||||
while (my $l = <STDIN>)
|
||||
{
|
||||
chomp($l);
|
||||
print "$l\n" if none { $l =~ /$_/ } @m2;
|
||||
}
|
Loading…
Add table
Reference in a new issue