Blockchain-Ethereum
view release on metacpan or search on metacpan
lib/Blockchain/Ethereum/Transaction/EIP1559.pm view on Meta::CPAN
$self->max_priority_fee_per_gas,
$self->max_fee_per_gas,
$self->gas_limit,
$self->to,
$self->value,
$self->data,
$self->_encode_access_list,
);
@params = $self->_normalize_params(\@params)->@*;
push(@params, $self->v, $self->r, $self->s)
if $self->v && $self->r && $self->s;
# eip-1559 transactions must be prefixed by 2 that is the
# transaction type
return TRANSACTION_PREFIX . $self->rlp->encode(\@params);
}
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
Blockchain::Ethereum::Transaction::EIP1559 - Ethereum Fee Market transaction abstraction (EIP-1559)
=head1 VERSION
version 0.021
=head1 SYNOPSIS
Transaction abstraction for EIP-1559 Fee Market transactions
my $transaction = Blockchain::Ethereum::Transaction::EIP1559->new(
nonce => '0x0',
max_fee_per_gas => '0x9',
max_priority_fee_per_gas => '0x0',
gas_limit => '0x1DE2B9',
to => '0x3535353535353535353535353535353535353535'
value => parse_unit('1', ETH),
data => '0x',
chain_id => '0x539',
access_list => [
{
address => '0x1234567890123456789012345678901234567890',
storage_keys => [
'0x0000000000000000000000000000000000000000000000000000000000000001',
'0x0000000000000000000000000000000000000000000000000000000000000002'
]
}
]
);
my $key = Blockchain::Ethereum::Key->new(
private_key => pack "H*",
'4646464646464646464646464646464646464646464646464646464646464646'
);
$key->sign_transaction($transaction);
my $raw_transaction = $transaction->serialize;
=head1 METHODS
=head2 serialize
Encodes the given transaction parameters to RLP
=over 4
=back
Returns the RLP encoded transaction bytes
=head1 AUTHOR
REFECO <refeco@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is Copyright (c) 2022 by REFECO.
This is free software, licensed under:
The MIT (X11) License
=cut
( run in 2.489 seconds using v1.01-cache-2.11-cpan-5837b0d9d2c )