wlan

#!/bin/bash

for x in $(seq 2 4093)
do
    echo "create vlan vlan${x}" >> /tmp/config.txt
    echo "configure vlan vlan${x} tag ${x}" >> /tmp/config.txt
    echo "configure vlan vlan${x} add ports all" >> /tmp/config.txt
done

Один цикл, зачем сюда перл не вижу смысла. Если именно нужен перл, могу позже дать.

P.S. На перле будет тоже самое практически. Только добавить open для открытия файла.