Added symlinks for genders for later usage

pinebook
silverwizard 5 years ago
parent c0134b6baf
commit bafe3a95ef
  1. 3
      Cyberpunk.pl

@ -7,6 +7,9 @@ use constant depth => 5;
$ARGV[0] =~ s/ /_/g;
mkdir $ARGV[0], 0755 unless -d $ARGV[0];
foreach my $item ("Male", "Female", "Nonbinary", "Cyborg"){
mkdir $ARGV[0] . "/" . $item,"0755" unless -d $ARGV[0] . "/" . $item;
}
generate($ARGV[0], $ARGV[0], 1);
sub generate {

Loading…
Cancel
Save