Difegue

#!/usr/bin/env perl

use strict;
use warnings;

use Mojo::JSON qw(decode_json encode_json);

# Get path to json file from arguments
my $json_file = $ARGV[0];

Difegue

require "language/node"

class Lanraragi < Formula
  desc "Web application for archival and reading of manga/doujinshi"
  homepage "https://github.com/Difegue/LANraragi"
  url "https://github.com/Difegue/LANraragi/archive/v.0.6.9-EX.tar.gz"
  sha256 "157a3ebdb5f132de179b69013aad351333990577bebd31e4b7b80e939b25921d"
  head "https://github.com/Difegue/LANraragi.git"

  depends_on "pkg-config" => :build

Difegue

# This is a test formula that always points to the latest commit on the dev branch.
require "language/node"

class Lanraragi < Formula
  desc "Web application for archival and reading of manga/doujinshi"
  homepage "https://github.com/Difegue/LANraragi"
  url "https://github.com/Difegue/LANraragi/archive/dev.tar.gz"
  version "0.0.0"
  head "https://github.com/Difegue/LANraragi.git", :branch => "dev"

Difegue

Hackermans-iMac:xamarin-macios hackerman$ brew install lanraragi --HEAD
==> Installing lanraragi from bl4cc4t/other
Warning: Your Xcode (10.2) is outdated.
Please update to Xcode 10.2.1 (or delete it).
Xcode can be updated from the App Store.

==> Cloning https://github.com/Bl4Cc4t/LANraragi.git
Updating /Users/hackerman/Library/Caches/Homebrew/lanraragi--git
From https://github.com/Bl4Cc4t/LANraragi
   b96e8d4..8f3b608  homebrew-test -> origin/homebrew-test

Difegue

INFOS: Manga;02e175378c483c59324b2d89de190a08;thnx-47-1;New Year's
INFOS: Game;03b4352e72e570fd93d6b83a2b62fd9d;ortu-125-1;7 Grand Dad
INFOS: Game;05a8dad31ba12c5469de1149ae1a6a04;kmrn-178-1;Riding Whip
INFOS: Manga;05ae246b2557b212a5be907c9f229204;thnx-35-1;Mario Paint
INFOS: Manga;0652fb0e0ef611f818ce0e5d7f7adc55;nyao-4-1;Kat & Ana 4
INFOS: Game;07975cb18e136f545fafeb5c0e3cbb00;iorz-24-1;LID0001
INFOS: Record;07f5176d77c75943caeeaca75118d2d7;aapp-23-1;Tylenol
INFOS: Manga;0a45cd8ebb365391656e6f7b6f575f1c;thnx-29-1;Victorious 2
INFOS: Game;0b257443961c681f7444cfe2d9946942;kueh-12-1;Many Pancake
INFOS: Game;0b6a707cf05b53b29283e1ecae765e93;babq-6-2;I Love2Count

Difegue

#!/usr/bin/perl

use strict;
use CGI qw/:standard/;

my $qyoutube= new CGI;

#Is this a call?
if ($qyoutube->param())

Difegue

@font-face {
  font-family: 'Nouveau_IBM';
  src: url("Nouveau_IBM.eot?") format("eot"), url("Nouveau_IBM.woff") format("woff"), url("Nouveau_IBM.ttf") format("truetype"), url("Nouveau_IBM.svg#Nouveau_IBM") format("svg");
}
html, body {
  height: 100%;
  width: 100%;
}

body {

Difegue

#!/usr/bin/perl

use strict;
use CGI qw(:standard);

my $qedit = new CGI;

print $qedit->header(-type    => 'text/html',
                   -charset => 'utf-8');

Difegue

#!/usr/bin/env perl
use v5.10;
use warnings;
use Dancer;
use URI::Escape qw(uri_escape_utf8);

# This is all the search engine does
get '/search' => sub {
    given (param("q")) {
        when (/^(?:!(?:ducky)?\s+|\\)(.*)/) { redirect 'http://www.google.com/search?btnI=1&q=' . uri_escape_utf8 $1 }