#!/usr/bin/perl

$url = 'http://tichuiq.com/public_html/images/cards/';

for $num (2..14) {
  for $let ('a'..'d') {
    $blah = $url;
    $blah .= '0' if ($num < 10);
    $blah .= $num;
    $blah .= $let;
    system("wget $blah.png");
  }
}

system("wget ${url}01.png");
system("wget ${url}15.png");
system("wget ${url}16.png");
system("wget ${url}17.png");