initialize( "ro/sham/bo");
sub initialize {
    my( $ARCHIVE ) = @_;
    make_path( $ARCHIVE );
}