Skip to main content
We’ve updated our Terms of Service. A new AI Addendum clarifies how Stack Overflow utilizes AI interactions.
Code Golf

Return to Answer

added 35 characters in body
Source Link
Dom Hastings
  • 24.6k
  • 4
  • 58
  • 94

Perl 5 -M5.10.0, 8473 bytes

$_=unpack"B*","....................w......|........{.?......";y/01/ */,saysay$_.reverse for/.{2613}/g

Try it online! Try it online!

Explanation

This solution consists of mostly unprintable characters which are a packed binary string containing thea representation of the left-half of the image as 0s and 1s which is unpacked into $_, then y/// (tr///) changes all the 0s to s and the 1s to *s, before the /.{2613}/g (m//) matches each stretch of 2613 chars passing them to say ($_), along with the reverse of $_, to print the result on individual lines.

Perl 5 -M5.10.0, 84 bytes

$_=unpack"B*","..........................|.........?......";y/01/ */,say for/.{26}/g

Try it online!

Explanation

This solution consists of mostly unprintable characters which are a packed binary string containing the representation of the image as 0s and 1s which is unpacked into $_, then y/// (tr///) changes all the 0s to s and the 1s to *s, before the /.{26}/g (m//) matches each stretch of 26 chars passing them to say to print the result on individual lines.

Perl 5 -M5.10.0, 73 bytes

$_=unpack"B*","......w......|{.......";y/01/ */,say$_.reverse for/.{13}/g

Try it online!

Explanation

This solution consists of mostly unprintable characters which are a packed binary string containing a representation of the left-half of the image as 0s and 1s which is unpacked into $_, then y/// (tr///) changes all the 0s to s and the 1s to *s, before the /.{13}/g (m//) matches each stretch of 13 chars passing them to say ($_), along with the reverse of $_, to print the result on individual lines.

Source Link
Dom Hastings
  • 24.6k
  • 4
  • 58
  • 94

Perl 5 -M5.10.0, 84 bytes

$_=unpack"B*","..........................|.........?......";y/01/ */,say for/.{26}/g

Try it online!

Explanation

This solution consists of mostly unprintable characters which are a packed binary string containing the representation of the image as 0s and 1s which is unpacked into $_, then y/// (tr///) changes all the 0s to s and the 1s to *s, before the /.{26}/g (m//) matches each stretch of 26 chars passing them to say to print the result on individual lines.

AltStyle によって変換されたページ (->オリジナル) /