harshals

use lib "lib";
package Library;
use Dancer ':syntax';
use Schema;
use Data::Dumper;

our $VERSION = '0.1';

set serializer => 'JSON';

harshals

<script>

function onLoadMe(data){
	alert(data);
}

$().ready(function(){ 


   var url = 'http://192.168.2.4:5000/api/Book?callback=onLoadMe';

harshals

		package App1;
		use strict;
		use warnings;
		
		use Dancer ':syntax';	

		set 'apphandler' => "PSGI";
		get '/' => sub {

			return "Hello from App1";

harshals

function onLoadCategory(books)  {

    var category_id;
	var extra_class = '';
    // populate the books on sidebar
   	$.each(books, function(  n,book1)  {
		
   		category_id =(book1['category_id']);
		

harshals

<script>

</script>

harshals

var Cookie = {
    findAll: function() {
        var cookies = {};
        _(document.cookie.split(';'))
            .chain()
            .map(function(m) {
                return m.replace(/^\s+/, '').replace(/\s+$/, '');
            })
            .each(function(c) {
                var arr = c.split('='),

harshals

Overview

Perlbrew is a way of managing perl versions and application specific libraries.

In general it doesn't require root, unless you want it installed in a location only writable by root. ;)

Its actually not such a great idea to have this in a home directory if you want it shared by multiple users, such as nginx/apache, so it may be a better idea to have your $PERLBREW_ROOT as /opt/perlbrew or something similar

CPAN documentation

harshals

use JSON::MaybeXS qw/decode_json encode_json/;
use Mojo::UserAgent;

my $ua = Mojo::UserAgent->new;
my $params = {
    purpose => 'some purpose',
    amount => 100
};
my $tx = $ua->build_tx(POST => "https://www.instamojo.com/api/1.1/payment-requests/",  form => $params );
$tx->req->headers->header('X-Api-Key' => "your key");

harshals

#!/usr/bin/perl
#clone of https://einv-apisandbox.nic.in/sample-code-in-java.html
# you need to save the public key of einv-apisandbox.nic.in in same folder

use Crypt::OpenSSL::Random qw/random_bytes/;
use Crypt::OpenSSL::RSA;
use Crypt::Mode::ECB;
use Crypt::PK::RSA;
use Mojo::File;
use Mojo::JSON qw/encode_json decode_json/;

harshals

const App2 = {
    data() {
      return {
        message: "Hello from App 2!",
      };
    },
    methods: {
        modifyMessage() {
            return "Modified Message"
        },