simple webvtt subtitle stripping

guess-02

cat 1aZHmb8P | perl -ne 's/\r?\n$//;/-->/&&next;s/<\/?c.*?>//g;s/<\d.*?>//g;/^\s*$/&&next;printf"$_\n"'

# get rid of webvtt header
cat 1aZHmb8P | perl -ne 's/\r?\n$//;/-->/&&next;s/<\/?c.*?>//g;s/<\d.*?>//g;next if /^\s*$/;printf"$_\n";BEGIN{while(<>){/##/&&last}}'

minor.sh

#!/bin/bash
youtube-dl --write-auto-sub --sub-lang en --skip-download -o /tmp/test.vtt $1 
perl -0777 -pi.bak -e '
s|(?m)^(\d{2}:\d{2}:\d{2}\.\d+) +--> +(\d{2}:\d{2}:\d{2}\.\d+).*[\r\n]+\s*(?s)((?:(?!\r?\n\r?\n).)*)|\3|mg;
s|<[^>]*>||mg;
s|^\s*\n||mg;
s|^(.*)(\r?\n\1)+$|\1|mg;
s|^(\d{2}:\d{2}:\d{2}\.\d+) +--> +(\d{2}:\d{2}:\d{2}\.\d+).*[\r\n]||mg;
' /tmp/test.en.vtt
cat /tmp/test.en.vtt

zengargoyle-guess-1

cat 1aZHmb8P | perl -lne '/-->/&&next;s/<\/?c.*?>//g;s/<\d.*?>//g;print'