for (qw(work work\startup)) {
	mkdir or -e or die "mkdir $_: $!";
}