diff options
Diffstat (limited to '2024/tcl')
| -rwxr-xr-x | 2024/tcl/01.tcl | 2 | 
1 files changed, 1 insertions, 1 deletions
| diff --git a/2024/tcl/01.tcl b/2024/tcl/01.tcl index 462a7a9..2248e11 100755 --- a/2024/tcl/01.tcl +++ b/2024/tcl/01.tcl @@ -6,7 +6,7 @@ setup 1  puts {Part 1: Find the sum of distances between pairs of numbers with the same ordinal in each list.}  while {[gets $input line] != -1} { -  lassign [regexp -inline -all {\d+} $line] ln rn +  lassign $line ln rn    lappend left_nums $ln    lappend right_nums $rn | 
