Shell Programming and Scripting

awk '/^\$AGE/{print gensub(/\//, FS ,"g",$1)}' infile

perl -wlne 's#\/#\t\t#g , print  if /^\$/ ;' infile.txt

cat file | grep '^$' | sed 's/\(.*\/\)\(.*[[:blank:]]\)\(.*$\)/\1     \2/' | sed 's/\///'

# sed -n '/^\$/s/\(.*\)\/\([^ ]*\).*/\1\t\2/p' infile

# script.sed

1 {
    ## Put 24 spaces in hold buffer.
    x
    s/^$/ / ; s/ */&&&&&&/ ; s/ */&&&&/ 
    x
}

/^\$/ {
    ## Remove words after first blank found.
    s/^\([^ ]*\).*/\1/
    ## Change order. Put spaces just after the part before the '/' character.
    G
    s/\(.*\)\/\(.*\)\n\([ ]*\)/\1\3\/\2/
    ## Take 24 leading characters, including spaces, and concatenate with rest of line.
    s/^\(.\{24\}\) *\/\(.*\)/\1\2/
    p
}

sed -n -f script.sed infile