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"
|
||||
|
||||
read -d '' PERL <<EOPERL
|
||||
print $(cat "$1" | xargs du | awk '{print $1}' | tr $'\n' '+' | sed 's/+$//')
|
||||
EOPERL
|
||||
kib_terms=$(cat "$1" | xargs du | awk '{print $1}' | tr $'\n' '+' | sed 's/+$//')
|
||||
|
||||
perl -e "$PERL"' . "\n";'
|
||||
perl -e "print $kib_terms"' . "\n";'
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue