
Your skill will accomplish what the force of many cannot
	PerlMonks

Re: Performing addition on hex value extracted from a string

by jwkrahn (Abbot)

on Feb 21, 2019 at 20:24 UTC ( [id://1230326]=note: print w/replies, xml )

Need Help??

Help for this page

Select Code to Download

Select or download this
```
#!usr/bin/perl
unlink("ccix.sdp_trc");
```

Select or download this

#!/usr/bin/perl
use warnings;
use strict;
unlink("ccix.sdp_trc");

Select or download this

$ perl -le'$x = "hexadecimal addr:0xdf7780 value"; print $x; $x =~ s/ 
+addr:0x \K (?= [[:xdigit:]]+ ) /500/x; print $x'
hexadecimal addr:0xdf7780 value
hexadecimal addr:0x500df7780 value

Select or download this

$ perl -le'$x = "hexadecimal addr:0xdf7780 value"; print $x; $x =~ s/ 
+addr:0x \K ( [[:xdigit:]]+ ) / $y = "500000000"; $l = length $1; subs
+tr $y, -$l, $l, $1; $y /xe; print $x'
hexadecimal addr:0xdf7780 value
hexadecimal addr:0x500df7780 value

Select or download this

$ perl -le'$x = "hexadecimal addr:0xdf7780 value"; print $x; $x =~ s/ 
+addr:0x \K ( [[:xdigit:]]+ ) / sprintf "%x", hex( $1 ) + 0x500000000 
+/xe; print $x'
hexadecimal addr:0xdf7780 value
hexadecimal addr:0x500df7780 value

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://1230326]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others wandering the Monastery: (7)

As of 2024-04-23 14:28 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found