diff --git a/access/parse_op b/access/parse_op
deleted file mode 100755
index 3345e457e3e59375c013ccf60b797da18c20c73d..0000000000000000000000000000000000000000
--- a/access/parse_op
+++ /dev/null
@@ -1,33 +0,0 @@
-#!/usr/bin/perl
-# Parse XML output of opreport
-
-use strict;
-use warnings;
-
-use XML::Simple;
-# use Data::Dumper;
-
-my $x = XMLin($ARGV[0], ForceArray => 1);
-
-# print STDERR Dumper($x);
-
-my $events = $x->{'setup'}->[0]->{'eventsetup'};
-my $classes = $x->{'classes'}->[0]->{'class'};
-my %class_to_event;
-for my $c (keys %$classes) {
-	my $d = $classes->{$c};
-	my $e = $events->{$d->{'event'}}->{'eventname'};
-	# print "$c: $e\n";
-	$class_to_event{$c} = $e;
-}
-
-my $bin = $x->{'binary'};
-my $thisbin = (values %{$bin})[0];
-for my $c (@{$thisbin->{'count'}}) {
-	# print Dumper($c);
-	if (ref($c) eq "HASH") {
-		print $class_to_event{$c->{'class'}}, " ", $c->{'content'}+0, "\n";
-	} else {
-		print $events->{0}->{'eventname'}, " ", $c+0, "\n";
-	}
-}