7 lines
286 B
Perl
7 lines
286 B
Perl
#!/usr/local/bin/perl
|
|
use ExtUtils::testlib;
|
|
use SSLeay;
|
|
|
|
$message=SSLeay::BN::dec2bn("936345681743241125150760694794510965960940252288797108931456691368672287489405603308617928680920874760917824938589009714909675985261365549781893129784821682998948722");
|
|
|
|
print $message->bn2hex."\n";
|