Newbie Questions: How to remove the leading zeros in tcl

This topic has 1 reply, 2 voices, and was last updated 15 years, 7 months ago by garry r fisher.

Creator

Topic
March 13, 2009 at 8:11 pm #50716

Shu Chen
Participant

Hi guys,

I would like to remove MRN leading zeros. sometimes there are 1 zero and sometimes there are 3 or 4.. which function should i use to to remove the leading zeros? any suggestions? thanks!!!

PID|0001||0130447||

PID|0001||0008537||
Creator

Topic

Viewing 0 reply threads

Author

Replies
- March 16, 2009 at 9:46 am #67226
  
  garry r fisher
  Participant
  
  Hi,
  
  Use the string trim commands or more specifically trimleft
  
  set iData 0001234
  
  set oData [string trimleft $iData 0]
  
  returns 1234
  
  Regards
  
  Garry
Author

Replies

Viewing 0 reply threads

The forum ‘Tcl Library’ is closed to new topics and replies.