PeterHarding at 06:09, 19 July 2009

2009-07-19T06:09:28Z

← Older revision		Revision as of 16:09, 19 July 2009
Line 344:		Line 344:
	[[Category:Python]]		[[Category:Python]]
	[[Category:Log Analysis]]		[[Category:Log Analysis]]
			[[Category:Examples]]

PeterHarding at 07:38, 24 May 2008

2008-05-24T07:38:34Z

Show changes

PeterHarding: New page:

 #!/usr/bin/env perl # #  $Id:$ # #-------------------------------------------------  @types = ('backline', 'frontline', 'teamlead', 'operations'); @nodes = ('node1', 'node2', 'node3'...

2008-05-24T07:37:16Z

New page: <pre> #!/usr/bin/env perl # # $Id:$ # #------------------------------------------------- @types = ('backline', 'frontline', 'teamlead', 'operations'); @nodes = ('node1', 'node2', 'node3'...

New page

<pre>
#!/usr/bin/env perl
#
# $Id:$
#
#-------------------------------------------------

@types = ('backline', 'frontline', 'teamlead', 'operations');
@nodes = ('node1', 'node2', 'node3', 'node6');

$no_nodes = $#nodes + 1;

printf "Building data for %d nodes\n", $no_nodes;

#---- Rewrite ------------------------------------

foreach $type (@types) {
$in = sprintf("users_%s_node1.dat", $type);
$out = sprintf("users_%s_%dnodes.dat", $type, $no_nodes);

open IN, "< $in";
open OUT, "> $out";

$_ = <IN>;
print OUT $_;

$cnt = 0;

while (<IN>) {
$idx = $cnt % $no_nodes;

s/node1/$nodes[$idx]/;

print OUT $_;

$cnt++;
}

close IN;
close OUT;
}

#-------------------------------------------------
</pre>

[[Category:Python]]
[[Category:Log Analysis]]

Timeline.py - Revision history

PeterHarding at 06:09, 19 July 2009

PeterHarding at 07:38, 24 May 2008

PeterHarding: New page:
#!/usr/bin/env perl # # $Id:$ # #------------------------------------------------- @types = ('backline', 'frontline', 'teamlead', 'operations'); @nodes = ('node1', 'node2', 'node3'...