014
26.02.2007, 09:36 Uhr
J-jayz-Z
Perl Crack ala Carte
(Operator)
|
Ich vermute mal, es soll in etwa so aussehen:
| C++: |
#include <iostream>
#include <string>
#include <vector>
#include <sstream>
#include <algorithm>
int main(int argc, char* argv[])
{
std::vector<int> num;
std::vector<int>::iterator state;
std::string input;
std::stringstream ss;
int var;
for(int i = 0; i < 100; i++)
num.push_back(i);
do
{
std::cin >> input;
ss << input;
if(!(ss >> var && ss.eof()))
{
if(input != "exit")
std::cout << "Sie müssen eine Zahl eingeben" << std::endl;
}
else
{
state = std::find(num.begin(), num.end(), var);
std::cout << var << " wurde " <<
(state != num.end() ? "" : "nicht ")
<< "gefunden" << std::endl;
}
ss.str("");
ss.clear();
} while(input != "exit");
std::cin.get();
return EXIT_SUCCESS;
}
|
--
perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="66756e2d736f66742e6465"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'
Dieser Post wurde am 26.02.2007 um 09:42 Uhr von J-jayz-Z editiert. |
