File manager - Edit - /usr/local/cpanel/3rdparty/perl/542/cpanel-lib/x86_64-linux/B/C/OverLoad/B/LOOP.pm
Back
package # do not index it B::LOOP; use B::C::Std; use B::C::File qw/loopsect/; sub do_save ( $op, $ = undef ) { loopsect()->comment_for_op("first, last, redoop, nextop, lastop"); my ( $ix, $sym ) = loopsect()->reserve( $op, "OP*" ); loopsect()->debug( $op->name, $op ); loopsect()->supdatel( $ix, '%s' => $op->save_baseop, '%s' => $op->first->save, '%s' => $op->last->save, '%s' => $op->redoop->save, '%s' => $op->nextop->save, '%s' => $op->lastop->save, ); return $sym; } 1;
| ver. 1.4 |
Github
|
.
| PHP 8.1.34 | Generation time: 0.04 |
proxy
|
phpinfo
|
Settings