1
0
Fork 0
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:
Shlomi Fish 2012-11-25 18:42:30 +02:00
parent f8d37be1e9
commit 7917931417

View 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;
}