App-Nopaste
view release on metacpan or search on metacpan
t/002-encoding.t view on Meta::CPAN
<title>pasting to magnet_web</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<table>
<tr>
<td>
<img src="http://paste.scsys.co.uk/static/nopaste.gif" alt="POE Paste with lovely alien head...">
</td>
<td align="left">
<h1><font face="courier new">No paste!</font></h1>
<font face="courier new" size="-1">
1. Select the channel for the URL announcment.<br>
2. Supply a nick for the announcement.<br>
3. Supply an summary of the paste for the announcement<br>
4. <b>Paste!</b><br>
5. Submit the form with the Paste it! button.<br>
</font>
</td>
</tr>
</table>
<form method='post' action='http://paste.scsys.co.uk/paste' enctype='application/x-www-from-urlencoded' name="pasteForm">
<font face="courier new" size="-1"><br><br>
1. channel: <select name='channel'><option value="" selected>(none)</option> <option value="#angerwhale">#angerwhale</option> <option value="#axkit-dahut">#axkit-dahut</option> <option value="#catalyst">#catalyst</option> <option value="#cataly...
2. your nick: <input type='text' name='nick' size='25' maxlength='25'><br><br>
3. summary: <input type='text' name='summary' size='80' maxlength='160'><br><br>
4. paste: <textarea name='paste' rows=25 cols=75 style='width:100%'></textarea><br><br>
5. <input type='submit' name='Paste it' value='Paste it'><input type='reset' name='Clear form' value='Clear form'>
</font>
</form><br>
<div align="right">
<a href="http://validator.w3.org/check/referer"><img border="0" src="http://www.w3.org/Icons/valid-html401" alt="Valid HTML 4.01!" height="31" width="88"></a><br><br>
</div>
<div>
<div align=right><font size='-1'><a href='http://sf.net/projects/pastebot/'>Pastebot</a> is powered by <a href='http://poe.perl.org/'>POE</a>.</font></div>
</div>
<!-- Automatically put the clipboard contents into the paste field and select it. -->
<script language="jscript" type="">
onload=function () {
try {
document.pasteForm.paste.value=clipboardData.getData("Text") || "";
document.pasteForm.paste.select();
}
catch (oErr) {}
}
t/002-encoding.t view on Meta::CPAN
</p>
<p>
From: Someone at 217.168.150.38
<br>
Summary: âtestâ
</p>
<p>
<pre>âtestâ</pre>
</p>
<p>
<div align=right><font size='-1'><a href='http://sf.net/projects/pastebot/'>Pastebot</a> is powered by <a href='http://poe.perl.org/'>POE</a>.</font></div>
</p>
</body>
</html>
RETURN
);
my @requests;
{
package LWP::Protocol::test;
use parent 'LWP::Protocol';
( run in 1.281 second using v1.01-cache-2.11-cpan-ceb78f64989 )