短縮URLを展開するbatファイル

Gemini作
注意：Shift-JISで保存すること。普通にUTF-8で保存すると文字化けが生じる。
chcp 65001 > nul を使ってUTF-8で保存すると、日本語を含むURLの展開で???になる。

@echo off
REM Use Shift-JIS / ANSI encoding for this bat file

:START_LOOP
echo.
echo ==========================================================
set /p short_url="展開したい短縮URLを入力してください: "
echo ==========================================================
echo.

REM Check for empty input
if "%short_url%"=="" (
    echo 入力がありませんでした。再度入力してください。
    goto START_LOOP
)

echo 短縮URL: %short_url%
echo リダイレクトの追跡を開始します...

REM Core command: -L (follow redirects), -v (verbose output), -s (silent/no progress), -o nul (don't download content)
REM Filter output for Location: and Host: headers
curl -L -v -s -o nul "%short_url%" 2>&1 | findstr /i "Location: Host:"

echo.
echo 処理が完了しました。

:ASK_CONTINUE
set /p continue_prompt="続けて別のURLを展開しますか？ (y/n): "

REM y or Y to continue
if /i "%continue_prompt%"=="y" goto START_LOOP

REM n or N to exit
if /i "%continue_prompt%"=="n" goto END_PROGRAM

REM Invalid input, ask again
echo "y"または"n"を入力してください。
goto ASK_CONTINUE


:END_PROGRAM
echo.
echo プログラムを終了します。
pause