wagnerpinheiro/extract-methods-perl-module.bash

## extract-methods-perl-module.bash
#!/bin/bash
# extract methods from perl modules
# author: Wagner Pinheiro
# public
grep "^sub .*.{" *
grep -h "^sub .*.{" * | sed 's/^sub /+/g' | sed 's/ {//g' | sed 's/{//g' | sed 's/\+\_/\-\_/g' | sort
# private
grep "^my .*.{" *
grep -h "^my .*.{" * | sed 's/^my /-/g' | sed 's/ \= sub {//g'
	#!/bin/bash
	# extract methods from perl modules
	# author: Wagner Pinheiro
	# public
	grep "^sub ..{"
	grep -h "^sub ..{" \| sed 's/^sub /+/g' \| sed 's/ {//g' \| sed 's/{//g' \| sed 's/\+\_/\-\_/g' \| sort
	# private
	grep "^my ..{"
	grep -h "^my ..{" \| sed 's/^my /-/g' \| sed 's/ \= sub {//g'