App-Nopaste
1 match

 view release on metacpan or  search on metacpan

t/002-encoding.t  view on Meta::CPAN 

use strict;
use warnings;
use Test::More 0.88;

my @content = (
    <<FORM,
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
  <head>
    <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">

t/002-encoding.t  view on Meta::CPAN 

      }
    </script>
  </body>
</html>
FORM
    <<RETURN,
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
 <head>
  <title>Your paste, number 211360...</title>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
  <meta http-equiv="refresh" content="5;url=http://paste.scsys.co.uk/211360">
 </head>
 <body>

  <p>
   This content is stored as
   <a href='http://paste.scsys.co.uk/211360'>http://paste.scsys.co.uk/211360</a>. You will be redirected
   shortly.
  </p>
  <p>



( run in 0.233 second using v1.01-cache-2.11-cpan-4d50c553e7e )