# HG changeset patch
# User rlm
# Date 1264343867 18000
# Node ID 021a9ab1ed5b05e3956fd1e94a114793e31189db
# Parent bb048e29406bb31a56514c20ce5fafe6996daa5c
[svn r38] added echo.pl, a test program for the backend of the website
diff -r bb048e29406b -r 021a9ab1ed5b awesome_js/Base64.js
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/awesome_js/Base64.js Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,142 @@
+/**
+*
+* Base64 encode / decode
+* http://www.webtoolkit.info/
+*
+**/
+
+var Base64 = {
+
+ // private property
+ _keyStr : "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=",
+
+ // public method for encoding
+ encode : function (input) {
+ var output = "";
+ var chr1, chr2, chr3, enc1, enc2, enc3, enc4;
+ var i = 0;
+
+ input = Base64._utf8_encode(input);
+
+ while (i < input.length) {
+
+ chr1 = input.charCodeAt(i++);
+ chr2 = input.charCodeAt(i++);
+ chr3 = input.charCodeAt(i++);
+
+ enc1 = chr1 >> 2;
+ enc2 = ((chr1 & 3) << 4) | (chr2 >> 4);
+ enc3 = ((chr2 & 15) << 2) | (chr3 >> 6);
+ enc4 = chr3 & 63;
+
+ if (isNaN(chr2)) {
+ enc3 = enc4 = 64;
+ } else if (isNaN(chr3)) {
+ enc4 = 64;
+ }
+
+ output = output +
+ this._keyStr.charAt(enc1) + this._keyStr.charAt(enc2) +
+ this._keyStr.charAt(enc3) + this._keyStr.charAt(enc4);
+
+ }
+
+ return output;
+ },
+
+ // public method for decoding
+ decode : function (input) {
+ var output = "";
+ var chr1, chr2, chr3;
+ var enc1, enc2, enc3, enc4;
+ var i = 0;
+
+ input = input.replace(/[^A-Za-z0-9\+\/\=]/g, "");
+
+ while (i < input.length) {
+
+ enc1 = this._keyStr.indexOf(input.charAt(i++));
+ enc2 = this._keyStr.indexOf(input.charAt(i++));
+ enc3 = this._keyStr.indexOf(input.charAt(i++));
+ enc4 = this._keyStr.indexOf(input.charAt(i++));
+
+ chr1 = (enc1 << 2) | (enc2 >> 4);
+ chr2 = ((enc2 & 15) << 4) | (enc3 >> 2);
+ chr3 = ((enc3 & 3) << 6) | enc4;
+
+ output = output + String.fromCharCode(chr1);
+
+ if (enc3 != 64) {
+ output = output + String.fromCharCode(chr2);
+ }
+ if (enc4 != 64) {
+ output = output + String.fromCharCode(chr3);
+ }
+
+ }
+
+ output = Base64._utf8_decode(output);
+
+ return output;
+
+ },
+
+ // private method for UTF-8 encoding
+ _utf8_encode : function (string) {
+ string = string.replace(/\r\n/g,"\n");
+ var utftext = "";
+
+ for (var n = 0; n < string.length; n++) {
+
+ var c = string.charCodeAt(n);
+
+ if (c < 128) {
+ utftext += String.fromCharCode(c);
+ }
+ else if((c > 127) && (c < 2048)) {
+ utftext += String.fromCharCode((c >> 6) | 192);
+ utftext += String.fromCharCode((c & 63) | 128);
+ }
+ else {
+ utftext += String.fromCharCode((c >> 12) | 224);
+ utftext += String.fromCharCode(((c >> 6) & 63) | 128);
+ utftext += String.fromCharCode((c & 63) | 128);
+ }
+
+ }
+
+ return utftext;
+ },
+
+ // private method for UTF-8 decoding
+ _utf8_decode : function (utftext) {
+ var string = "";
+ var i = 0;
+ var c = c1 = c2 = 0;
+
+ while ( i < utftext.length ) {
+
+ c = utftext.charCodeAt(i);
+
+ if (c < 128) {
+ string += String.fromCharCode(c);
+ i++;
+ }
+ else if((c > 191) && (c < 224)) {
+ c2 = utftext.charCodeAt(i+1);
+ string += String.fromCharCode(((c & 31) << 6) | (c2 & 63));
+ i += 2;
+ }
+ else {
+ c2 = utftext.charCodeAt(i+1);
+ c3 = utftext.charCodeAt(i+2);
+ string += String.fromCharCode(((c & 15) << 12) | ((c2 & 63) << 6) | (c3 & 63));
+ i += 3;
+ }
+
+ }
+
+ return string;
+ }
+
+}
diff -r bb048e29406b -r 021a9ab1ed5b awesome_js/prototype.js
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/awesome_js/prototype.js Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,4874 @@
+/* Prototype JavaScript framework, version 1.6.1
+ * (c) 2005-2009 Sam Stephenson
+ *
+ * Prototype is freely distributable under the terms of an MIT-style license.
+ * For details, see the Prototype web site: http://www.prototypejs.org/
+ *
+ *--------------------------------------------------------------------------*/
+
+var Prototype = {
+ Version: '1.6.1',
+
+ Browser: (function(){
+ var ua = navigator.userAgent;
+ var isOpera = Object.prototype.toString.call(window.opera) == '[object Opera]';
+ return {
+ IE: !!window.attachEvent && !isOpera,
+ Opera: isOpera,
+ WebKit: ua.indexOf('AppleWebKit/') > -1,
+ Gecko: ua.indexOf('Gecko') > -1 && ua.indexOf('KHTML') === -1,
+ MobileSafari: /Apple.*Mobile.*Safari/.test(ua)
+ }
+ })(),
+
+ BrowserFeatures: {
+ XPath: !!document.evaluate,
+ SelectorsAPI: !!document.querySelector,
+ ElementExtensions: (function() {
+ var constructor = window.Element || window.HTMLElement;
+ return !!(constructor && constructor.prototype);
+ })(),
+ SpecificElementExtensions: (function() {
+ if (typeof window.HTMLDivElement !== 'undefined')
+ return true;
+
+ var div = document.createElement('div');
+ var form = document.createElement('form');
+ var isSupported = false;
+
+ if (div['__proto__'] && (div['__proto__'] !== form['__proto__'])) {
+ isSupported = true;
+ }
+
+ div = form = null;
+
+ return isSupported;
+ })()
+ },
+
+ ScriptFragment: '
diff -r bb048e29406b -r 021a9ab1ed5b buy.pl
--- a/buy.pl Mon Jan 18 15:52:33 2010 -0500
+++ b/buy.pl Sun Jan 24 09:37:47 2010 -0500
@@ -89,19 +89,21 @@
$materialcolor = $1;
-$r = "
-";
+HERE
+
return $r;
}
diff -r bb048e29406b -r 021a9ab1ed5b data.xml
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/data.xml Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,17 @@
+
diff -r bb048e29406b -r 021a9ab1ed5b echo.css
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/echo.css Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,16 @@
+div#perlClick
+{
+background-color: #aaa;
+}
+
+
+div#output
+{
+background-color: #585;
+}
+
+
+div#disp_contain
+{
+background-color: #aab;
+}
diff -r bb048e29406b -r 021a9ab1ed5b echo.html
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/echo.html Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,65 @@
+
+
+
+
+
+
+
+
+Laserkard | Design Studio
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+Send this shiz!
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff -r bb048e29406b -r 021a9ab1ed5b echo.pl
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/echo.pl Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,224 @@
+#!/usr/bin/perl
+
+
+use List::Util qw(first max maxstr min minstr reduce shuffle sum);
+use Storable;
+use CGI::Ajax;
+use CGI qw(:standard);
+use URI::Escape;
+use MIME::QuotedPrint;
+use MIME::Base64;
+use Mail::Sendmail 0.75; # doesn't work with v. 0.74!
+use XML::Simple;
+use Data::Dumper;
+$Data::Dumper::Indent = 1;
+
+
+my $q = new CGI;
+
+
+
+my %hash =
+(
+'echo' => \&echo
+);
+
+
+
+my $pjx = CGI::Ajax->new(%hash);
+
+# this outputs the html for the page, and stops caching, so the fucker will work in IE.
+print $pjx->build_html($q,\&gen,{-Cache_Control => 'no-store, no-cache, must-revalidate', -Pragma => 'no-cache'});
+
+
+
+
+sub gen
+{
+ {
+ local( $/, *FH ) ;
+ open( FH, "<./echo.html" ) or die "sudden flaming death\n";
+ $a = ;
+ }
+
+ {
+ local( $/, *FH ) ;
+ open( FH, "<./top_menu.include" ) or die "sudden flaming death\n";
+ $b = ;
+ }
+
+
+
+$a =~ s/PERL-REPLACE::TOP_MENU/$b/; #equivalent to , but in perl and with more memory problems :)
+
+
+
+return $a
+
+
+}
+
+
+
+sub echo
+{
+
+
+my $svg = $_[0];
+
+my $destination = 'rlm@mit.edu';
+
+
+$svg = &repair_file($svg);
+&mail($svg, $destination);
+
+
+
+
+return "done.";
+
+}
+
+
+sub repair_file
+{
+my $svg = $_[0];
+
+$xml = new XML::Simple;
+
+
+$sss = <
+Created with Raphaƫl
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+HERE
+
+
+# read XML file
+$data = $xml->XMLin($sss, ForceArray => 1);
+
+
+my %data = %$data;
+
+my %juzz =
+(
+
+path => $data{'path'},
+rect => $data{'rect'},
+width =>"16in" ,
+height =>"12in" ,
+version =>"1.1",
+xmlns =>"http://www.w3.org/2000/svg"
+
+);
+
+
+$out = $xml->XMLout(\%juzz , RootName=>'svg');
+
+
+my $fixed = <
+
+HERE
+
+
+
+$fixed .= $out;
+
+#print $fixed;
+
+ return $fixed;
+
+
+}
+
+
+
+sub mail
+{
+
+
+
+%mail =
+(
+from => 'rlm@mit.edu',
+to => $_[1],
+subject => 'Test attachment',
+);
+
+
+$boundary = "====" . time() . "====";
+$mail{'content-type'} = "multipart/mixed; boundary=\"$boundary\"";
+
+$message = encode_qp( "email from your friend PERL." );
+
+$attach1 = encode_base64($_[0]); # this part is so cool! I can e-mail a perl varible to anyone in the world!
+
+$attach2 = encode_base64("hi this is a test arttacghjkalsdlasndlashdlsf");
+
+
+
+
+
+$boundary = '--'.$boundary;
+$mail{body} = <
+
+
+
+
+
+
+
+Laserkard | Design Studio
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff -r bb048e29406b -r 021a9ab1ed5b log/error_log.log
--- a/log/error_log.log Mon Jan 18 15:52:33 2010 -0500
+++ b/log/error_log.log Sun Jan 24 09:37:47 2010 -0500
@@ -2643,3 +2643,58 @@
[Mon Jan 18 15:13:26 2010] [error] [client 18.111.69.201] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
[Mon Jan 18 15:13:28 2010] [error] [client 18.111.69.201] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
[Mon Jan 18 15:39:37 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/faq.css, referer: http://laserkard.rlmcintyre.com/faq.php
+[Thu Jan 21 02:09:18 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
+[Thu Jan 21 02:09:22 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
+[Thu Jan 21 02:09:43 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
+[Thu Jan 21 02:09:47 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
+[Thu Jan 21 10:48:47 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
+[Thu Jan 21 10:48:50 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
+[Thu Jan 21 21:09:15 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/favicon.ico
+[Fri Jan 22 22:55:04 2010] [error] [client 18.238.1.90] File does not exist: /home/rlm/Desktop/web/laserkard/echo
+[Sat Jan 23 11:26:48 2010] [error] [client 18.238.1.90] syntax error at /home/rlm/Desktop/web/laserkard/echo.pl line 91, near ")
+[Sat Jan 23 11:26:48 2010] [error] [client 18.238.1.90] {"
+[Sat Jan 23 11:26:48 2010] [error] [client 18.238.1.90] Can't find string terminator '"' anywhere before EOF at /home/rlm/Desktop/web/laserkard/echo.pl line 110.
+[Sat Jan 23 11:26:48 2010] [error] [client 18.238.1.90] Premature end of script headers: echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] syntax error at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 13, near ">", referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] syntax error at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 13, near ">", referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] syntax error at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 13, near "))", referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] syntax error at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 17, near "}", referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] Bareword "header" not allowed while "strict subs" in use at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 14., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] Bareword "header" not allowed while "strict subs" in use at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 27., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] Bareword "header" not allowed while "strict subs" in use at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 45., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] Execution of /home/rlm/Desktop/web/laserkard/mailshiv.pl aborted due to compilation errors., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:27:56 2010] [error] [client 18.238.1.90] Premature end of script headers: mailshiv.pl, referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:30:14 2010] [error] [client 18.238.1.90] Cannot open subscribers.txt: No such file or directory at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 31., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:30:14 2010] [error] [client 18.238.1.90] Premature end of script headers: mailshiv.pl, referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:35:03 2010] [error] [client 18.238.1.90] Cannot open subscribers.txt: Permission denied at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 35., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:35:03 2010] [error] [client 18.238.1.90] Premature end of script headers: mailshiv.pl, referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:35:32 2010] [error] [client 18.238.1.90] Cannot open subscribers.txt: Permission denied at /home/rlm/Desktop/web/laserkard/mailshiv.pl line 34., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:35:32 2010] [error] [client 18.238.1.90] Premature end of script headers: mailshiv.pl, referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:36:56 2010] [error] [client 18.238.1.90] malformed header from script. Bad header=rlm@mit.edu: mailshiv.pl, referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 11:41:57 2010] [error] [client 18.238.1.90] malformed header from script. Bad header=rlm@mit.edu: mailshiv.pl, referer: http://laserkard.com/echo.pl
+[Sat Jan 23 12:05:57 2010] [error] [client 18.238.1.90] (8)Exec format error: exec of '/home/rlm/Desktop/web/laserkard/megamail.pl' failed
+[Sat Jan 23 12:05:57 2010] [error] [client 18.238.1.90] Premature end of script headers: megamail.pl
+[Sat Jan 23 13:41:47 2010] [error] [client 18.238.1.90] Problem with code: Bad file descriptor at /home/rlm/Desktop/web/laserkard/echo.pl line 70., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 13:41:47 2010] [error] [client 18.238.1.90] , referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 13:43:48 2010] [error] [client 18.238.1.90] Problem with code: Died at /home/rlm/Desktop/web/laserkard/echo.pl line 78., referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 13:43:48 2010] [error] [client 18.238.1.90] at /usr/share/perl/5.10/CGI/Carp.pm line 356, referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 13:43:48 2010] [error] [client 18.238.1.90] \tCGI::Carp::realdie('Died at /home/rlm/Desktop/web/laserkard/echo.pl line 78.\\x{a}') called at /usr/share/perl/5.10/CGI/Carp.pm line 437, referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 13:43:48 2010] [error] [client 18.238.1.90] \tCGI::Carp::die() called at /home/rlm/Desktop/web/laserkard/echo.pl line 78, referer: http://laserkard.rlmcintyre.com/echo.pl
+[Sat Jan 23 13:43:48 2010] [error] [client 18.238.1.90] \tmain::echo('
diff -r bb048e29406b -r 021a9ab1ed5b out.xml
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/out.xml Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,15 @@
+
diff -r bb048e29406b -r 021a9ab1ed5b paypal/basic_acrylic_clear.paylist
--- a/paypal/basic_acrylic_clear.paylist Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/basic_acrylic_clear.paylist Sun Jan 24 09:37:47 2010 -0500
@@ -107,7 +107,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -137,7 +137,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -167,7 +167,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -197,7 +197,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b paypal/basic_acrylic_green.paylist
--- a/paypal/basic_acrylic_green.paylist Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/basic_acrylic_green.paylist Sun Jan 24 09:37:47 2010 -0500
@@ -107,7 +107,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -137,7 +137,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -167,7 +167,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -197,7 +197,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b paypal/big_acrylic_clear.paylist
--- a/paypal/big_acrylic_clear.paylist Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/big_acrylic_clear.paylist Sun Jan 24 09:37:47 2010 -0500
@@ -107,7 +107,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -137,7 +137,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b paypal/big_acrylic_green.paylist
--- a/paypal/big_acrylic_green.paylist Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/big_acrylic_green.paylist Sun Jan 24 09:37:47 2010 -0500
@@ -107,7 +107,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -137,7 +137,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b paypal/classic_acrylic_clear.paylist
--- a/paypal/classic_acrylic_clear.paylist Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/classic_acrylic_clear.paylist Sun Jan 24 09:37:47 2010 -0500
@@ -107,7 +107,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -137,7 +137,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -167,7 +167,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -197,7 +197,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -227,7 +227,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -257,7 +257,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b paypal/classic_acrylic_green.paylist
--- a/paypal/classic_acrylic_green.paylist Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/classic_acrylic_green.paylist Sun Jan 24 09:37:47 2010 -0500
@@ -107,7 +107,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -137,7 +137,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -167,7 +167,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -197,7 +197,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -227,7 +227,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -257,7 +257,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b paypal/generate_paylists.pm
--- a/paypal/generate_paylists.pm Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/generate_paylists.pm Sun Jan 24 09:37:47 2010 -0500
@@ -139,7 +139,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b paypal/lines_acrylic_clear.paylist
--- a/paypal/lines_acrylic_clear.paylist Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/lines_acrylic_clear.paylist Sun Jan 24 09:37:47 2010 -0500
@@ -107,7 +107,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -137,7 +137,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -167,7 +167,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -197,7 +197,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -227,7 +227,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -257,7 +257,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b paypal/lines_acrylic_green.paylist
--- a/paypal/lines_acrylic_green.paylist Mon Jan 18 15:52:33 2010 -0500
+++ b/paypal/lines_acrylic_green.paylist Sun Jan 24 09:37:47 2010 -0500
@@ -107,7 +107,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -137,7 +137,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -167,7 +167,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -197,7 +197,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -227,7 +227,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
@@ -257,7 +257,7 @@
onKeyUp="
tt.remove();
-var font_size = 65;
+var font_size = 30;
tt = raphe.print(0, 145, value, raphe.getFont('HelveticaNeue', 700), font_size);
tt.attr('stroke', '#f00');
diff -r bb048e29406b -r 021a9ab1ed5b svgparsetest.pl
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/svgparsetest.pl Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,69 @@
+#!/usr/bin/perl
+
+# use module
+use XML::Simple;
+use Data::Dumper;
+$xml = new XML::Simple;
+
+
+$sss = <
+Created with Raphaƫl
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+HERE
+
+
+# read XML file
+$data = $xml->XMLin($sss, ForceArray => 1);
+
+
+my %data = %$data;
+
+my %juzz =
+(
+
+path => $data{'path'},
+rect => $data{'rect'},
+width =>"16in" ,
+height =>"12in" ,
+version =>"1.1",
+xmlns =>"http://www.w3.org/2000/svg"
+
+);
+
+
+$out = $xml->XMLout(\%juzz , RootName=>'svg');
+
+
+my $fixed = <
+
+HERE
+
+
+
+$fixed .= $out;
+
+print $fixed;
+
+
diff -r bb048e29406b -r 021a9ab1ed5b test.html
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/test.html Sun Jan 24 09:37:47 2010 -0500
@@ -0,0 +1,74 @@
+
+
+
+
+
+
+
+
+Laserkard | Design Studio
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+click on me!!!
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+