diff options
Diffstat (limited to '2024/tcl/01.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 |