summaryrefslogtreecommitdiff
path: root/util/updates/update_1.21.pl
blob: d59d36036283b26eec8d197f824832565ef64d20 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#!/usr/bin/perl

# create static/sf and static/st with subdirectories
chdir '/www/vndb/static';

sub mk {
  for (@_) {
    mkdir $_ or die "mkdir: $_: $!";
    chmod 0777, $_ or die "chmod: $_: $!";
  }
}

mk 'sf', 'st';
mk sprintf('sf/%02d',$_), sprintf('st/%02d',$_) for (0..99);