#!/usr/bin/env zsh

while read -r input; do
    case "${input}" in
        'Begin...')
            wtype -k Escape
            wtype "I$(date '+%F %T:  Begin ')"
            ;;
        'End...')
            wtype -k Escape
            wtype "I$(date '+%F %T:  End   ')"
            wtype -k Escape
            wtype 'kly$jpo'
            wtype "$(date '+%F %T:  Begin ')"

            ;;
    esac
done