domperor

# 言語処理100本ノック2015 第１章：準備運動 bashシェル芸 2020-09-29 domperor
# perl はずるいようだが， -pe 正規表現置換しか使わない（gsedやsedの亜種）ということでお目溢しあれ。

# 00.文字列の逆順
echo "stressed" | rev

# 01.「パタトクカシーー」
echo "パタトクカシーー" | cut -c 1,3,5,7
# 参考
echo "パタトクカシーー" | python3 -c "a=input();print(a[::2])"

domperor

class Gnuplot < Formula
  desc "Command-driven, interactive function plotting"
  homepage "http://www.gnuplot.info/"
  url "https://downloads.sourceforge.net/project/gnuplot/gnuplot/5.2.8/gnuplot-5.2.8.tar.gz"
  sha256 "60a6764ccf404a1668c140f11cc1f699290ab70daa1151bb58fed6139a28ac37"

  bottle do
    sha256 "752b5a6f7e93af1e2a23e8ab27c6d19d286f50b054eb0b7accdfa5765c69b3b0" => :catalina
    sha256 "645bff55538d6610cf93539dbeec5067a750a6edc0fbbbab6e34710c16db10ef" => :mojave
    sha256 "36f2d97fbf5772eef3cd0f1988997848e7367ab7943a2542ea15d93bbfd083ce" => :high_sierra

domperor

\read-1to\INPUT
\def\changetox#1#2{\expandafter\ifx#2-%
x\else
x\expandafter\changetox\expandafter#2\fi}
\immediate\write16{\expandafter\changetox\INPUT-}
\bye

domperor

\documentclass[a4paper,10pt,twoside,uplatex,papersize]{article}
\usepackage{lipsum}

%%%%change the baselineskip in your footnote%%%%
\makeatletter
\let\@makefntextOrig\@makefntext
\def\@makefntext#1{\@makefntextOrig{%
\baselineskip=14pt%%%here
\let\@finalstrut\@gobble #1}}
\makeatother

domperor

%読み込んだ文字列\Iを反転させ\rIに入れる
\read-1to\I
\def\rI{}
\def\appendreverse#1#2{%
\expandafter\ifx#2;\edef\rI{#1\rI}
\else\edef\rI{#1\rI}\expandafter\expandafter\expandafter\appendreverse\expandafter#2\fi}
\expandafter\appendreverse\I;

%%最初の７文字で場合分け
\def\flag{YES}

domperor

\read-1to\n
\newcount\N
\newcount\T
\newcount\D
\N\n
\def\flag{Yes}
\def\readline#1 #2 #3{\def\t{#1}\def\x{#2}\def\y{#3}}
\readline0 0 0
\def\loop{%
\let\tt\t

domperor

\read-1to\N
\newcount\n
\n\N
\newcount\c
\def\loop{\read-1to\I
\expandafter\ifx\csname\I\endcsname\relax
\expandafter\def\csname\I\endcsname{}\advance\c1
\fi
\ifnum\the\n>1\advance\n-1\loop\fi}
\loop