From 2803d9ad0e85bd19e870079ba3d4ccf5a8d888ed Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 19 Sep 2011 15:32:26 +0200
Subject: [PATCH] create lable from pool name (for bonnie)

---
 public/code/pool.label.pl | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100644 public/code/pool.label.pl

diff --git a/public/code/pool.label.pl b/public/code/pool.label.pl
new file mode 100644
index 0000000..f06a167
--- /dev/null
+++ b/public/code/pool.label.pl
@@ -0,0 +1,7 @@
+foreach my $v ( @{ $row->{'pool'} } ) {
+ my $drives = $v =~ s/sd/sd/g;
+ my $vdevs  = $v =~ s/raidz/raidz/g;
+ my $c = $drives / $vdevs;
+ $update->{label} = "$vdevs.$c";
+}
+
-- 
2.20.1