pacpruner: Remove extra PERL HERE doc
This commit is contained in:
parent
d6a5fe58e5
commit
1f24e094ca
1 changed files with 2 additions and 4 deletions
|
|
@ -11,8 +11,6 @@ EOUSAGE
|
||||||
|
|
||||||
[ -z "$1" ] && dedcat "$usage"
|
[ -z "$1" ] && dedcat "$usage"
|
||||||
|
|
||||||
read -d '' PERL <<EOPERL
|
kib_terms=$(cat "$1" | xargs du | awk '{print $1}' | tr $'\n' '+' | sed 's/+$//')
|
||||||
print $(cat "$1" | xargs du | awk '{print $1}' | tr $'\n' '+' | sed 's/+$//')
|
|
||||||
EOPERL
|
|
||||||
|
|
||||||
perl -e "$PERL"' . "\n";'
|
perl -e "print $kib_terms"' . "\n";'
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue