1 package MojoFacets::Profile;
6 use base 'Mojolicious::Controller';
8 use Data::Dump qw(dump);
14 my $path = '/tmp/MojoFacets.profile.';
16 if ( my $profile = $self->param('profile') ) {
17 warn "XXX profile $profile\n";
18 my $dir = $self->app->home->rel_dir('public') . "/profile/$profile";
19 mkpath $dir unless -d $dir;
20 system "nytprofhtml --file $path$profile --out $dir";
21 $self->redirect_to("/profile/$profile/index.html");
26 profiles => [ map { s/^\Q$path\E//; $_ } glob "$path*" ],