[ci skip] fix perl-install

perl-install

@@ -27,6 +27,23 @@ if [[ $_ARCH = aarch64 ]]; then
   _ARCH=arm64
 fi
 
+TAR_CMD=gtar
+if ! type $TAR_CMD &>/dev/null; then
+  TAR_CMD=tar
+  if ! type $TAR_CMD &>/dev/null; then
+    die 'Cannot find `tar` command'
+  fi
+fi
+
+TAR_OPTION=xzf
+TAR_SUFFIX=tar.gz
+COMPRESS_TYPE=gz
+if type xz &>/dev/null; then
+  TAR_OPTION=xJf
+  TAR_SUFFIX=tar.xz
+  COMPRESS_TYPE=xz
+fi
+
 if type curl &>/dev/null; then
   HTTP_GET=curl
   HTTP_GET_OPTION='-fsSL'
@@ -37,7 +54,7 @@ else
   die 'Cannot find `curl` nor `wget`'
 fi
 
-LATEST_LINE=$($HTTP_GET $HTTP_GET_OPTION https://raw.githubusercontent.com/skaji/relocatable-perl/main/releases.csv | (\grep -m 1 ,$_OS,$_ARCH,; cat >/dev/null))
+LATEST_LINE=$($HTTP_GET $HTTP_GET_OPTION https://raw.githubusercontent.com/skaji/relocatable-perl/main/releases.csv | (\grep -m 1 ,$_OS,$_ARCH,$COMPRESS_TYPE; cat >/dev/null))
 if [[ -z $LATEST_LINE ]]; then
   die "Failed to determine latest perl version"
 fi
@@ -49,21 +66,6 @@ if [[ $PRINT_VERSION = "YES" ]]; then
   exit
 fi
 
-TAR_CMD=gtar
-if ! type $TAR_CMD &>/dev/null; then
-  TAR_CMD=tar
-  if ! type $TAR_CMD &>/dev/null; then
-    die 'Cannot find `tar` command'
-  fi
-fi
-
-TAR_OPTION=xzf
-TAR_SUFFIX=tar.gz
-if type xz &>/dev/null; then
-  TAR_OPTION=xJf
-  TAR_SUFFIX=tar.xz
-fi
-
 INSTALL_DIR=$1
 if [[ -d $INSTALL_DIR ]]; then
   [[ -w $INSTALL_DIR ]] || die "You don't have write permission to $INSTALL_DIR"