summaryrefslogtreecommitdiff
path: root/FS/FS/cdr/taqua_om.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/cdr/taqua_om.pm')
-rw-r--r--FS/FS/cdr/taqua_om.pm19
1 files changed, 19 insertions, 0 deletions
diff --git a/FS/FS/cdr/taqua_om.pm b/FS/FS/cdr/taqua_om.pm
new file mode 100644
index 0000000..c94ea59
--- /dev/null
+++ b/FS/FS/cdr/taqua_om.pm
@@ -0,0 +1,19 @@
+package FS::cdr::taqua_om;
+
+use strict;
+use vars qw( %info );
+use base qw( FS::cdr::taqua );
+
+%info = (
+ %FS::cdr::taqua::info,
+ 'name' => 'Taqua OM',
+ 'weight' => 132,
+ 'header' => 0,
+ 'sep_char' => ';',
+ 'row_callback' => sub { my $row = shift;
+ $row =~ s/^<\d+>\|[\da-f\|]+\|(\d+;)/$1/;
+ $row;
+ },
+);
+
+1;