Functional for --sql flag

1 files changed, 21 insertions, 21 deletions

diff --git a/shared.pl b/shared.pl
index 16993ab..4c71855 100644
--- a/shared.pl
+++ b/shared.pl
@@ -1,27 +1,6 @@
 # File to hold shared subroutines
 
 
-# Handle digging into non-scalar tags and other deep arrays
-# 	@_[0] -> array tag/deep array
-sub array_handler {
-	my @output;
-
-	for my $i (@_){
-		# If another array, recursively handle
-		if (ref($i) eq 'ARRAY'){
-			push(@output, array_handler(@$i));
-		}
-
-		# If scalar, append to output normally
-		elsif (!ref($i)){
-			push(@output, "$i");
-		}
-	}
-
-	return @output;
-}
-
-
 # Wrapper to handle sqlite commands, return an array of returned lines from sqlite output
 # 	@_[0]            -> database handle
 # 	@_[1]            -> command/statement
@@ -43,3 +22,24 @@ sub db_cmd {
 }
 
 1;
+
+# Handle digging into non-scalar tags and other deep arrays
+# 	@_[0] -> array tag/deep array
+sub flatten_array {
+	my @output;
+
+	for my $i (@_){
+		# If another array, recursively handle
+		if (ref($i) eq 'ARRAY'){
+			push(@output, flatten_array(@$i));
+		}
+
+		# If scalar, append to output normally
+		elsif (!ref($i)){
+			push(@output, "$i");
+		}
+	}
+
+	return @output;
+}
+