Help for this page

Select Code to Download

Select or download this
perl -Mstrict -wne'print "$1\n" while /\B(-I\S+)/g;' infile

Select or download this

#!/usr/bin/perl -w
use strict;
while(<>) {
    print "$1\n" while /\B(-I\S+)/g;
}