diff --git a/Cyberpunk.pl b/Cyberpunk.pl
index 955245a..c2ff111 100755
--- a/Cyberpunk.pl
+++ b/Cyberpunk.pl
@@ -8,7 +8,7 @@ $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;
+	mkdir $ARGV[0] . "/" . $item unless -d $ARGV[0] . "/" . $item;
 }
 generate($ARGV[0], $ARGV[0], 1);
 
@@ -33,6 +33,7 @@ sub generate {
 			push(@ORIENTATION, $item);
 		}
 	}
+	symlink($_[0] . "/" . $_[1] . ".md",  $_[0] . "/" . $GENDER . "/" . $_[1] . ".md");
 	
 	printf $CHAR "Name: " . $_[1] . "\n\n";
 	printf $CHAR "INT: " . $INT . "\n";