diff --git a/cmd/client/main.go b/cmd/client/main.go
new file mode 100644
index 00000000..d498d912
--- /dev/null
+++ b/cmd/client/main.go
@@ -0,0 +1,273 @@
+package main
+
+import (
+	"bytes"
+	"context"
+	"crypto/x509"
+	"encoding/base64"
+	"encoding/pem"
+	"errors"
+	"flag"
+	"fmt"
+	"net/http"
+	"net/url"
+	"os"
+	"strconv"
+	"time"
+
+	"github.com/google/go-cmp/cmp"
+	"github.com/transparency-dev/formats/log"
+	tdnote "github.com/transparency-dev/formats/note"
+	"github.com/transparency-dev/merkle/proof"
+	"github.com/transparency-dev/merkle/rfc6962"
+	"github.com/transparency-dev/tessera/api/layout"
+	"github.com/transparency-dev/tessera/ctonly"
+	"github.com/transparency-dev/tesseract/internal/client"
+	"github.com/transparency-dev/tesseract/internal/types/staticct"
+	"github.com/transparency-dev/tesseract/internal/x509util"
+	"golang.org/x/mod/sumdb/note"
+	"k8s.io/klog/v2"
+)
+
+var (
+	monitoringURL = flag.String("monitoring_url", "", "Log monitoring URL.")
+	leafIndex     = flag.String("leaf_index", "", "The index of the leaf to fetch.")
+	origin        = flag.String("origin", "", "Origin of the log, for checkpoints and the monitoring prefix. MUST be provided if verify=true.")
+	logPubKey     = flag.String("log_public_key", "", "Public key for the log, base64 encoded. MUST be provided if verify=true.")
+	verify        = flag.Bool("verify", true, "Whether or not to verify the leaf entry.")
+)
+
+var (
+	hasher = rfc6962.DefaultHasher
+)
+
+func main() {
+	// Verify Flags
+	klog.InitFlags(nil)
+	flag.Parse()
+
+	if *monitoringURL == "" {
+		klog.Exitf("--monitoring_url must be set")
+	}
+
+	if *leafIndex == "" {
+		klog.Exitf("--leaf_index must be set")
+	}
+
+	li, err := strconv.ParseUint(*leafIndex, 10, 64)
+	if err != nil {
+		klog.Exitf("Invalid --leaf_index: %v", err)
+	}
+
+	logURL, err := url.Parse(*monitoringURL)
+	if err != nil {
+		klog.Exitf("Invalid --monitoring_url %q: %v", *monitoringURL, err)
+	}
+
+	if *verify {
+		if *logPubKey == "" {
+			klog.Exitf("log_public_key MUST be provided when verify=true")
+		}
+		if *origin == "" {
+			klog.Exitf("origin MUST be provided when verify=true")
+		}
+	}
+
+	// Create client
+	hc := &http.Client{
+		Timeout: 30 * time.Second,
+	}
+	fetcher, err := client.NewHTTPFetcher(logURL, hc)
+	if err != nil {
+		klog.Exitf("Failed to create HTTP fetcher: %v", err)
+	}
+	ctx := context.Background()
+
+	cp, nil := readCheckpoint(ctx, fetcher)
+	if li >= cp.Size {
+		klog.Exitf("Leaf index %d is out of range for log size %d", li, cp.Size)
+	}
+
+	// Fetch entry
+	bundleIndex := li / uint64(layout.EntryBundleWidth)
+	indexInBundle := li % uint64(layout.EntryBundleWidth)
+
+	bundle, err := client.GetEntryBundle(ctx, fetcher.ReadEntryBundle, bundleIndex, cp.Size)
+	if err != nil {
+		klog.Exitf("Failed to get entry bundle: %v", err)
+	}
+
+	if int(indexInBundle) >= len(bundle.Entries) {
+		klog.Exitf("Index %d is out of range for bundle of size %d", indexInBundle, len(bundle.Entries))
+	}
+	entryData := bundle.Entries[indexInBundle]
+
+	var entry staticct.Entry
+	if err := entry.UnmarshalText(entryData); err != nil {
+		klog.Exitf("Failed to unmarshal entry: %v", err)
+	}
+
+	if *verify {
+		if errs := verifyLeafEntry(ctx, &entry, cp, li, fetcher); len(errs) != 0 {
+			klog.Exitf("Failed to verify leaf entry: %s", errors.Join(errs...))
+		}
+	}
+
+	pemBlock := &pem.Block{
+		Type: "CERTIFICATE",
+		Bytes: func() []byte {
+			if entry.IsPrecert {
+				return entry.Precertificate
+			}
+			return entry.Certificate
+		}(),
+	}
+
+	if err := pem.Encode(os.Stdout, pemBlock); err != nil {
+		klog.Exitf("Failed to encode PEM: %v", err)
+	}
+}
+
+// logSigVerifier creates a note.Verifier for the Static CT API log by taking
+// an origin string and a base64-encoded public key.
+func logSigVerifier(origin, b64PubKey string) (note.Verifier, error) {
+	if origin == "" {
+		return nil, errors.New("origin cannot be empty")
+	}
+	if b64PubKey == "" {
+		return nil, errors.New("log public key cannot be empty")
+	}
+
+	derBytes, err := base64.StdEncoding.DecodeString(b64PubKey)
+	if err != nil {
+		return nil, fmt.Errorf("error decoding public key: %s", err)
+	}
+	pub, err := x509.ParsePKIXPublicKey(derBytes)
+	if err != nil {
+		return nil, fmt.Errorf("error parsing public key: %v", err)
+	}
+
+	verifierKey, err := tdnote.RFC6962VerifierString(origin, pub)
+	if err != nil {
+		return nil, fmt.Errorf("error creating RFC6962 verifier string: %v", err)
+	}
+	logSigV, err := tdnote.NewVerifier(verifierKey)
+	if err != nil {
+		return nil, fmt.Errorf("error creating verifier: %v", err)
+	}
+
+	return logSigV, nil
+}
+
+func readCheckpoint(ctx context.Context, fetcher *client.HTTPFetcher) (*log.Checkpoint, error) {
+	// Read Checkpoint
+	cpRaw, err := fetcher.ReadCheckpoint(ctx)
+	if err != nil {
+		return nil, fmt.Errorf("failed to fetch checkpoint: %v", err)
+	}
+	if *verify {
+		logSigV, err := logSigVerifier(*origin, *logPubKey)
+		if err != nil {
+			return nil, fmt.Errorf("failed to create verifier: %v", err)
+		}
+		cp, _, _, err := log.ParseCheckpoint(cpRaw, *origin, logSigV)
+		if err != nil {
+			return nil, fmt.Errorf("failed to parse checkpoint: %v", err)
+		}
+		return cp, nil
+	}
+	// A https://c2sp.org/static-ct-api logsize is on the second line
+	l := bytes.SplitN(cpRaw, []byte("\n"), 3)
+	if len(l) < 2 {
+		return nil, errors.New("invalid checkpoint - no size")
+	}
+	size, err := strconv.ParseUint(string(l[1]), 10, 64)
+	if err != nil {
+		return nil, fmt.Errorf("invalid checkpoint - can't extract size: %v", err)
+	}
+	return &log.Checkpoint{Size: size}, nil
+}
+
+func verifyLeafEntry(ctx context.Context, entry *staticct.Entry, cp *log.Checkpoint, li uint64, fetcher *client.HTTPFetcher) []error {
+	// Check that the entry has been built properly
+	var errs []error
+	e := ctonly.Entry{
+		Timestamp:         entry.Timestamp,
+		IsPrecert:         entry.IsPrecert,
+		Certificate:       entry.Certificate,
+		Precertificate:    entry.Precertificate,
+		IssuerKeyHash:     entry.IssuerKeyHash,
+		FingerprintsChain: entry.FingerprintsChain,
+	}
+
+	if li != entry.LeafIndex {
+		errs = append(errs, fmt.Errorf("leaf_index in leaf's %d SCT: got %d, want %d", li, li, entry.LeafIndex))
+	}
+
+	var chain []*x509.Certificate
+	if e.IsPrecert {
+		cert, err := x509.ParseCertificate(e.Precertificate)
+		if err != nil {
+			errs = append(errs, fmt.Errorf("failed to parse precertificate: %v", err))
+		}
+		chain = append(chain, cert)
+	} else {
+		cert, err := x509.ParseCertificate(e.Certificate)
+		if err != nil {
+			errs = append(errs, fmt.Errorf("failed to parse precertificate: %v", err))
+		}
+		chain = append(chain, cert)
+	}
+	for i, hash := range entry.FingerprintsChain {
+		iss, err := fetcher.ReadIssuer(ctx, hash[:])
+		if err != nil {
+			errs = append(errs, fmt.Errorf("failed to fetch issuer number %d: %v", i, err))
+		}
+		cert, err := x509.ParseCertificate(iss)
+		if err != nil {
+			errs = append(errs, fmt.Errorf("failed to parse issuer number %d: %v", i, err))
+		}
+		chain = append(chain, cert)
+	}
+
+	// TODO(phboneff): check that the chain is valid
+	// TODO(phboneff): check that the last element of the chain is a root
+	// TODO(phboneff): check that the chain validates with the log's rootset
+
+	ee, err := x509util.EntryFromChain(chain, entry.IsPrecert, entry.Timestamp)
+	if err != nil {
+		errs = append(errs, fmt.Errorf("failed to reconstruct entry from the leaf and issuers: %v", err))
+	}
+	eee := ctonly.Entry{
+		Timestamp:         ee.Timestamp,
+		IsPrecert:         ee.IsPrecert,
+		Certificate:       ee.Certificate,
+		Precertificate:    ee.Precertificate,
+		IssuerKeyHash:     ee.IssuerKeyHash,
+		FingerprintsChain: ee.FingerprintsChain,
+	}
+	if diff := cmp.Diff(e, eee); len(diff) != 0 {
+		errs = append(errs, fmt.Errorf("leaf entry not built properly (- fetched leaf data, + expected value): \n%s", diff))
+	}
+
+	// TODO(phboneff): if this is an end cert and it has an SCT from this very log, check that SCT
+
+	// Inclusion proof
+	proofBuilder, err := client.NewProofBuilder(ctx, log.Checkpoint{
+		Origin: *origin,
+		Size:   cp.Size,
+		Hash:   cp.Hash}, fetcher.ReadTile)
+	if err != nil {
+		errs = append(errs, fmt.Errorf("failed to create proofBuilder: %v", err))
+	}
+	mlh := e.MerkleLeafHash(entry.LeafIndex)
+	ip, err := proofBuilder.InclusionProof(ctx, li)
+	if err != nil {
+		errs = append(errs, fmt.Errorf("failed to build InclusionProof %v", err))
+	}
+	if err := proof.VerifyInclusion(hasher, li, cp.Size, mlh, ip, cp.Hash); err != nil {
+		errs = append(errs, fmt.Errorf("failed to verify inclusion of leaf %d in tree of size %d: %v", li, cp.Size, err))
+	}
+
+	return errs
+}