"Fossies" - the Fresh Open Source Software Archive

Member "ferm-2.6/test/ebtables_tempfile_rename.pl" (30 Jan 2021, 367 Bytes) of package /linux/privat/ferm-2.6.tar.xz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) Perl source code syntax highlighting (style: standard) with prefixed line numbers and code folding option. Alternatively you can here view or download the uninterpreted source code file. See also the latest Fossies "Diffs" side-by-side code changes report for "ebtables_tempfile_rename.pl": 2.5.1_vs_2.6.

    1 #!/usr/bin/perl -w
    2 
    3 # This script renames ebtables temporary file suffixes consistently
    4 # from the result files so that tests can be done.
    5 
    6 use strict;
    7 
    8 my $matches = 0;
    9 
   10 while (<>) {
   11     s/--atomic-file \/tmp\/ferm.(\w+) /--atomic-file \/tmp\/ferm.1 /;
   12     s/--atomic-file \/tmp\/ferm.(\w+) --atomic-save/--atomic-file \/tmp\/ferm.0 --atomic-save/;
   13     print $_;
   14 }
   15