This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| "simple script ✎ :".say; | |
| my $привет = "hi!"; | |
| "☺ Peace Nigga!".say; | |
| сказать $привет, " ☻ "; | |
| sub сказать(*@слова) { | |
| @слова.say; | |
| } | |
| #vim: perl6 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #compdef cpanm | |
| #autoload | |
| typeset -A opt_args | |
| local context state line | |
| _arguments -C \ | |
| '(-h)'{-h,--help}'[prints help]' \ | |
| '(-v --verobse)'{-v,--verbose}'[turn on chatty output.]' \ | |
| '(-q --quiet)'{-q,--quiet}'[turn off the most output.]' \ |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # check routes: script/app routes | |
| my $r = $self->routes; | |
| $r->route("/$_")->to("user-auth#$_") for qw(login signup forgot); | |
| # check user | |
| for($r->bridge->to('user-auth#check')) { | |
| $_->route('/')->to('about#index'); | |
| $_->route('/movies')->to('movie#main'); |
NewerOlder