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
function camelize(e) { | |
return e.replace(/\W+(.)/g, function(e, t) { | |
return t.toUpperCase(); | |
}); | |
} | |
function uncamelize(e, t) { | |
return e.replace(/([a-z\d])([A-Z])/g, "$1" + (t || " ") + "$2"); | |
} |
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
function swapcase(t) { | |
return t.replace(/([a-z]+)|([A-Z]+)/g, function(t, w) { | |
return w ? t.toUpperCase() : t.toLowerCase(); | |
}); | |
} |
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
<!DOCTYPE html> | |
<html> | |
<head> | |
</head> | |
<body> | |
<script> | |
var div = document.createElement("div"); | |
div.innerHTML = '<a href="http://www.whak.ca">www.WHAK.ca</a>'; | |
document.body.appendChild(div); | |
</script> |
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
function get_hi(a) { | |
function b(a, b) { | |
return "<span style=color:#" + a + ">" + (b || "$1") + "</span>"; | |
} | |
for (e = document.body.children, c = e[1].text, e[0].value = c, x = [ /&/g, "&", /</g, "<", />/g, ">", /\\./g, function(a) { | |
return "r" + p.push(a) + ">"; | |
}, /([\[({=:+,]\s*)\/(?![\/\*])/g, "$1<h/", /(\/\*[\s|\S]*?\*\/|\/\/.*)|(<h\/.+?\/\w*)|".*?"|'.*?'/g, function(a, c, d) { | |
return "r" + p.push(b(c ? "666" :d ? "6a0" :"719", a)) + ">"; | |
}, /((&\w+;|[-\/+*=?:.,;()\[\]{}|%^!])+)/g, b("17b"), /\b(break|case|catch|continue|push|default|eval|delete|fromcharcode|charcodeat|do|else|false|finally|for|function|if|in|instanceof|new|return|switch|this|throw|true|try|typeof|var|void|while|with)\b/gi, b("f00"), /\b(0x[\da-f]+|\d+)\b/g, b("d83"), /r(\d+)>/g, function(a, b) { | |
return p[b - 1].replace(x[18], x[19]); |
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
function fake_btoa(a) { | |
var c, d, e, f, g, h, i, j, o, b = "WHAK.com/PaCker BDEFGIJLMNOQR\ | |
STUVXYZbdfghijlnpqstuvwxyz+01234567=", k = 0, l = 0, m = "", n = []; | |
if (!a) return a; | |
do c = a.charCodeAt(k++), d = a.charCodeAt(k++), e = a.charCodeAt(k++), j = c << 16 | d << 8 | e, | |
f = 63 & j >> 18, g = 63 & j >> 12, h = 63 & j >> 6, i = 63 & j, n[l++] = b.charAt(f) + b.charAt(g) + b.charAt(h) + b.charAt(i); while (k < a.length); | |
return m = n.join(""), o = a.length % 3, (o ? m.slice(0, o - 3) :m) + "===".slice(o || 3); | |
} | |
function fake_atob(a) { |
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
<%@ LANGUAGE="VBSCRIPT" %> | |
<% | |
function myFunction() | |
response.write("Hello world") | |
end function | |
eval("myFunction()") | |
%> |
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
<%@ LANGUAGE="VBSCRIPT" %> | |
<% | |
function load(ASPfile) | |
Server.Execute(ASPfile) | |
end function | |
'Call load("SameDirOrSubDir.asp") | |
%> |
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
<%@ LANGUAGE="VBSCRIPT" %> | |
<% | |
'fetch("webpage.htm") | |
sub fetch(file) | |
Dim x | |
Set fso = Server.CreateObject("Scripting.FileSystemObject") | |
set fs = fso.OpenTextFile(Server.MapPath(file), 1, true) | |
Do Until fs.AtEndOfStream | |
x = fs.ReadLine | |
Response.Write x |
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
<%@ LANGUAGE="VBSCRIPT" %> | |
<% | |
sub fetch(URL) | |
Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP") | |
objXMLHTTP.Open "GET", URL, false | |
objXMLHTTP.Send | |
Response.Write objXMLHTTP.responseText | |
Set objXMLHTTP = Nothing | |
response.end 'remove this if not using for 404.asp or it will kill the page after load | |
end sub |
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
function is_in(a,b,c,d){return c=RegExp(b),d=c.test(a)} | |
alert(is_in("WHAK.com's awesome haystack!","needle")); | |
//returns false | |
alert(is_in("WHAK.com's awesome haystack!","some")); | |
//returns true |