derek/TheBandwidthBenchmark
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Cleanup code

Browse Source 
Remove test and debug code
This commit is contained in:
Jan Eitzinger
2021-02-08 13:50:35 +01:00
parent 0350e37787
commit 48787ece85
1 changed files with 0 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
util/benchmarkSystem.pl
View File

@@ -60,13 +60,6 @@ my $SMT;
`likwid-topology -g > $DIR/topology.txt`; `likwid-topology -g > $DIR/topology.txt`;
my $topo = `likwid-topology -O`; my $topo = `likwid-topology -O`;
#my $topo = do {
# local $/ = undef;
# open my $fh, "<", './topo.txt'
# or die "could not open tile: $!";
# <$fh>;
#};
foreach my $ln (split("\n", $topo)) { foreach my $ln (split("\n", $topo)) {
if ( $ln =~ /^CPU name:/ ) { if ( $ln =~ /^CPU name:/ ) {
my @fields = split(",", $ln); my @fields = split(",", $ln);