| 1 | #!/macports/bin/bash |
|---|
| 2 | while read -a portname |
|---|
| 3 | do |
|---|
| 4 | echo -e "${portname[2]}" |
|---|
| 5 | |
|---|
| 6 | cd $(dirname $(port file ${portname[0]})) |
|---|
| 7 | |
|---|
| 8 | cp 'Portfile' 'Portfile.orig' |
|---|
| 9 | declare portrev=( $( grep 'perl5.branches' $(port file ${portname[0]}) ) ) |
|---|
| 10 | if [[ ${#portrev[@]} -eq 0 ]] |
|---|
| 11 | then |
|---|
| 12 | sed -En -e "1,/^PortGroup/p" 'Portfile.orig' \ |
|---|
| 13 | > 'Portfile' |
|---|
| 14 | echo -e "perl5.branches 5.8 5.10 5.12 5.14 5.16" \ |
|---|
| 15 | >> 'Portfile' |
|---|
| 16 | sed -E -e "1,/PortGroup/d" 'Portfile.orig' \ |
|---|
| 17 | >> 'Portfile' |
|---|
| 18 | else |
|---|
| 19 | sed -E -e "/^perl5.branches/s/^(.*)$/\1 5.16/" \ |
|---|
| 20 | 'Portfile.orig' \ |
|---|
| 21 | > 'Portfile' |
|---|
| 22 | fi |
|---|
| 23 | rm 'Portfile.orig' |
|---|
| 24 | |
|---|
| 25 | done < <( port list name:^p5- ) |
|---|
