pastebin
| #1 paste tool since 2002
create new paste
tools
api
archive
real-time
faq
pastebin
Follow @pastebin
create new paste
trending pastes
sign up
login
my settings
my profile
My Pastes
Public Pastes
Untitled
ABAP | 2 sec ago
Untitled
5 sec ago
Ruspornpics.com Backdoor
58 sec ago
premium accounts 12/02/...
16 sec ago
Untitled
17 sec ago
{{{Live RuGbY }}} Italy...
1 min ago
premium accounts 12/02/...
29 sec ago
Untitled
23 sec ago
Layout Width
Share Pastebin
Zoffix
By: a guest | Mar 22nd, 2008 | Syntax:
Perl
| Size: 0.26 KB | Hits: 676 | Expires: Never
Download
|
Raw
|
Embed
|
Report abuse
sub
error
{
my
$self
=
shift
;
if
(
@_
)
{
$self
->
{
ERROR
}
=
shift
;
}
return
$self
->
{
ERROR
}
;
}
sub
content
{
my
$self
=
shift
;
if
(
@_
)
{
$self
->
{
CONTENT
}
=
shift
;
}
return
$self
->
{
CONTENT
}
;
}
create new paste
|
create new version of this paste
RAW Paste Data
sub error { my $self = shift; if ( @_ ) { $self->{ ERROR } = shift; } return $self->{ ERROR }; } sub content { my $self = shift; if ( @_ ) { $self->{ CONTENT } = shift; } return $self->{ CONTENT }; }