perl-Net-SSLeay-paths.patch

   1 diff -urN Net-SSLeay-1.36.org/examples/bio.pl Net-SSLeay-1.36/examples/bio.pl
   2 --- Net-SSLeay-1.36.org/examples/bio.pl 2007-10-16 10:26:45.000000000 +0200
   3 +++ Net-SSLeay-1.36/examples/bio.pl     2010-04-11 11:23:59.500407002 +0200
   4 @@ -1,4 +1,4 @@
   5 -#!/usr/local/bin/perl -w
   6 +#!/usr/bin/perl -w
   7  # bio.pl mikem@open.com.au
   8  #
   9  # Test and demonstrate BIO interface
  10 diff -urN Net-SSLeay-1.36.org/examples/bulk.pl Net-SSLeay-1.36/examples/bulk.pl
  11 --- Net-SSLeay-1.36.org/examples/bulk.pl        2007-10-16 10:26:45.000000000 +0200
  12 +++ Net-SSLeay-1.36/examples/bulk.pl    2010-04-11 11:23:59.503115868 +0200
  13 @@ -1,4 +1,4 @@
  14 -#!/usr/local/bin/perl -w
  15 +#!/usr/bin/perl -w
  16  # bulk.pl - 8.6.1998, Sampo Kellomaki <sampo@iki.fi>
  17  # Send tons of stuff over SSL (just for testing).
  18  # There's also an example about using the call back.
  19 diff -urN Net-SSLeay-1.36.org/examples/callback.pl Net-SSLeay-1.36/examples/callback.pl
  20 --- Net-SSLeay-1.36.org/examples/callback.pl    2007-10-16 10:26:45.000000000 +0200
  21 +++ Net-SSLeay-1.36/examples/callback.pl        2010-04-11 11:23:59.503115868 +0200
  22 @@ -1,4 +1,4 @@
  23 -#!/usr/local/bin/perl -w
  24 +#!/usr/bin/perl -w
  25  # callback.pl - 8.6.1998, Sampo Kellomaki <sampo@iki.fi>
  26  # 31.7.1999, fixed callback args, --Sampo
  27  # 7.4.2001,  adapted to 0.9.6a and numerous bug reports --Sampo
  28 diff -urN Net-SSLeay-1.36.org/examples/cli-cert.pl Net-SSLeay-1.36/examples/cli-cert.pl
  29 --- Net-SSLeay-1.36.org/examples/cli-cert.pl    2007-10-16 10:26:45.000000000 +0200
  30 +++ Net-SSLeay-1.36/examples/cli-cert.pl        2010-04-11 11:23:59.503115868 +0200
  31 @@ -1,4 +1,4 @@
  32 -#!/usr/local/bin/perl
  33 +#!/usr/bin/perl
  34  # cli-cert.pl
  35  # 8.6.1998, originally written as stdio_bulk.pl Sampo Kellomaki <sampo@iki.fi>
  36  # 8.12.2001, adapted to test client certificates
  37 diff -urN Net-SSLeay-1.36.org/examples/ephemeral.pl Net-SSLeay-1.36/examples/ephemeral.pl
  38 --- Net-SSLeay-1.36.org/examples/ephemeral.pl   2007-10-16 10:26:45.000000000 +0200
  39 +++ Net-SSLeay-1.36/examples/ephemeral.pl       2010-04-11 11:23:59.503115868 +0200
  40 @@ -1,4 +1,4 @@
  41 -#!/usr/local/bin/perl -w
  42 +#!/usr/bin/perl -w
  43  # ephemeral.pl mikem@open.com.au
  44  #
  45  # Test and demonstrate setting ephemeral RSA key
  46 diff -urN Net-SSLeay-1.36.org/examples/minicli.pl Net-SSLeay-1.36/examples/minicli.pl
  47 --- Net-SSLeay-1.36.org/examples/minicli.pl     2007-10-16 10:26:45.000000000 +0200
  48 +++ Net-SSLeay-1.36/examples/minicli.pl 2010-04-11 11:23:59.507073715 +0200
  49 @@ -1,4 +1,4 @@
  50 -#!/usr/local/bin/perl
  51 +#!/usr/bin/perl
  52  # minicli.pl - Sampo Kellomaki <sampo@iki.fi>
  53
  54  use Socket;
  55 diff -urN Net-SSLeay-1.36.org/examples/passwd-cb.pl Net-SSLeay-1.36/examples/passwd-cb.pl
  56 --- Net-SSLeay-1.36.org/examples/passwd-cb.pl   2007-10-16 10:26:45.000000000 +0200
  57 +++ Net-SSLeay-1.36/examples/passwd-cb.pl       2010-04-11 11:23:59.507073715 +0200
  58 @@ -1,4 +1,4 @@
  59 -#!/usr/local/bin/perl
  60 +#!/usr/bin/perl
  61  # passwd-cb.pl
  62  #
  63  # Check using password callbacks to decrypt private keys
  64 diff -urN Net-SSLeay-1.36.org/examples/stdio_bulk.pl Net-SSLeay-1.36/examples/stdio_bulk.pl
  65 --- Net-SSLeay-1.36.org/examples/stdio_bulk.pl  2007-10-16 10:26:45.000000000 +0200
  66 +++ Net-SSLeay-1.36/examples/stdio_bulk.pl      2010-04-11 11:23:59.507073715 +0200
  67 @@ -1,4 +1,4 @@
  68 -#!/usr/local/bin/perl
  69 +#!/usr/bin/perl
  70  # stdio_bulk.pl - 8.6.1998, Sampo Kellomaki <sampo@iki.fi>
  71  # Send tons of stuff over SSL connected by STDIO pipe.
  72  # This also demonstrates how you can communicate via arbitrary stream, not
  73 diff -urN Net-SSLeay-1.36.org/lib/Net/SSLeay.pm Net-SSLeay-1.36/lib/Net/SSLeay.pm
  74 --- Net-SSLeay-1.36.org/lib/Net/SSLeay.pm       2010-01-30 22:07:38.000000000 +0100
  75 +++ Net-SSLeay-1.36/lib/Net/SSLeay.pm   2010-04-11 11:25:10.780816683 +0200
  76 @@ -1304,7 +1304,7 @@
  77
  78  The following is a simple SSLeay client (with too little error checking :-(
  79
  80 -    #!/usr/local/bin/perl
  81 +    #!/usr/bin/perl
  82      use Socket;
  83      use Net::SSLeay qw(die_now die_if_ssl_error) ;
  84      Net::SSLeay::load_error_strings();
  85 @@ -1345,7 +1345,7 @@
  86
  87  The following is a simple SSLeay echo server (non forking):
  88
  89 -    #!/usr/local/bin/perl -w
  90 +    #!/usr/bin/perl -w
  91      use Socket;
  92      use Net::SSLeay qw(die_now die_if_ssl_error);
  93      Net::SSLeay::load_error_strings();
  94 @@ -1408,7 +1408,7 @@
  95  it had better be without any encryption or else it will not know where
  96  to ask for the password. Note how C<STDIN> and C<STDOUT> are wired to SSL.
  97
  98 -    #!/usr/local/bin/perl
  99 +    #!/usr/bin/perl
 100      # /etc/inetd.conf
 101      #    ssltst stream tcp nowait root /path/to/server.pl server.pl
 102      # /etc/services