#!/bin/sh
cat /dev/null > /tmp/SeTnewtag
dialog --title "select pkgs from perl_append(perl extension modules)" \
  --checklist "select packages from perl_append series. \
You can move cursor with UP/DOWN key and push space \
key to select pkgs. After finish selecting, \
push Enter to start installation. " 24 72 15 \
"perl_ExtUtils_CChecker" "" "off" \
"perl_ExtUtils_Depends" "" "off" \
"perl_ExtUtils_PkgConfig" "" "off" \
"perl_File_lchown" "" "off" \
"perl_Glib" "" "off" \
"perl_Net_DBus" "" "off" \
"perl_SGMLSpm" "" "off" \
"perl_Switch" "" "off" \
"perl_Test_Fatal" "" "off" \
"perl_Try_Tiny" "" "off" \
"perl_URI" "" "off" \
"perl_XML_NamespaceSupport" "" "off" \
"perl_XML_Parser" "" "off" \
"perl_XML_SAX" "" "off" \
"perl_XML_SAX_Base" "" "off" \
"perl_XML_Simple" "" "off" \
"perl_XML_Twig" "" "off" \
2> /tmp/SeTpkgs
if [ $? = 1 -o $? = 255 ]; then
  rm -f /tmp/SeTpkgs
  > /tmp/SeTnewtag
  for pkg in perl_ExtUtils_CChecker perl_ExtUtils_Depends perl_ExtUtils_PkgConfig perl_File_lchown perl_Glib perl_Net_DBus perl_SGMLSpm perl_Switch perl_Test_Fatal perl_Try_Tiny perl_URI perl_XML_NamespaceSupport perl_XML_Parser perl_XML_SAX perl_XML_SAX_Base perl_XML_Simple perl_XML_Twig  ; do 
  echo "$pkg: SKP" >> /tmp/SeTnewtag
  done
  exit
fi
cat /dev/null > /tmp/SeTnewtag
for PACKAGE in perl_ExtUtils_CChecker perl_ExtUtils_Depends perl_ExtUtils_PkgConfig perl_File_lchown perl_Glib perl_Net_DBus perl_SGMLSpm perl_Switch perl_Test_Fatal perl_Try_Tiny perl_URI perl_XML_NamespaceSupport perl_XML_Parser perl_XML_SAX perl_XML_SAX_Base perl_XML_Simple perl_XML_Twig  ; do
    if grep "$PACKAGE" /tmp/SeTpkgs 1> /dev/null 2> /dev/null ; then
        echo "$PACKAGE: ADD" >> /tmp/SeTnewtag
    else echo "$PACKAGE: SKP" >> /tmp/SeTnewtag
    fi
done
rm -f /tmp/SeTpkgs