fork(1) download
  1. function g(s)
  2. p=mod(-numel(s),4);s(end+1:end+p)=0;
  3. disp(['<~' dec2base(swapbytes(typecast(s,'uint32')),'!':'u')'(:)'(1:end-p) '~>'])
  4.  
  5. end %required only when function and script are in the same file
  6.  
  7. charString = 'easy';
  8. disp(charString);
  9. g(charString);
  10.  
  11. charString = 'test';
  12. disp(charString);
  13. g(charString);
  14.  
  15. charString = 'code golf';
  16. disp(charString);
  17. g(charString);
  18.  
  19. charString = 'Programming Puzzles';
  20. disp(charString);
  21. g(charString);
  22.  
Success #stdin #stdout 0.18s 65096KB
stdin
Standard input is empty
stdout
easy
<~ARTY*~>
test
<~FCfN8~>
code golf
<~@rGmh+D5V/Ac~>
Programming Puzzles
<~:i^JeEa`g%Bl7Q+:j%)1Ch7Y~>