Initial commit++

This commit is contained in:
swagg boi 2023-09-23 00:44:32 -04:00
parent f52befb644
commit 9fcc556a60
5 changed files with 39 additions and 1 deletions

0
Dockerfile Normal file
View file

7
META6.json Normal file
View file

@ -0,0 +1,7 @@
{
"name": "Hyperlink-Redirect",
"depends": ["Humming-Bird"],
"provides": {
"Hyperlink-Redirect": "lib/Hyperlink-Redirect.rakumod"
}
}

View file

@ -1,3 +1,7 @@
# Hyperlink-Redirect # Hyperlink-Redirect
A "useful" tool for turning hyperlinks into redirects in the name of shortening hyperlinks! 🧠 🧑‍🔬 A "useful" tool for turning hyperlinks into redirects in the name of shortening hyperlinks! 🧠 🧑‍🔬
## TODO
1. Fix my `.emacs` to style stuff in a way that is not in fact insane

14
bin/hyperlink-redirect Executable file
View file

@ -0,0 +1,14 @@
#!/usr/bin/env raku
# It is important that you import App::MyService after
# Humming-Bird::Core to avoid having some weird side-effects with
# route declarations in your service
use v6.d;
use Humming-Bird::Core;
# Local libs
use lib 'lib';
use Hyperlink-Redirect;
listen(3000);

View file

@ -0,0 +1,13 @@
use v6.d;
use Humming-Bird::Core;
# Normally would 'use' local libs here for Controller and Model and
# what not but keeping it simple for now...
# Must set the root path lest yet miss setting $!root
my $router = Router.new(root => '/');
$router.get(-> $request, $response {
$response.write('testing 123...')
});